ncoding of a data tree, on a single line # using flow-style mappings and sequences # Similar to JSON except without quoted keys sub encode { my $self = shift; my ( $args ) = @_; if( !ref