> join(‘,’,@{$foo->{‘bar’}})
foo.bar.join(',')
$foo->{bar}->join(',')
use FunctionalPerl ":autobox"; my $foo= {bar=> ["hi", "there"]}; is $foo->{bar}->join(','), 'hi,there';