##
$foo{$a, $b, $c}
##
##
$foo{ join $;, $a, $b, $c }
##
##
$;{Just=>another=>Perl=>Hacker=>} = $/;
##
##
$;{Just,another,Perl,Hacker,} = $/;
##
##
$;{ join ' ', "Just", "another", "Perl", "Hacker", "" }
= "\n";
##
##
$;{"Just another Perl Hacker"} = "\n";
##
##
print %;
##
##
("Just another Perl Hacker", "\n")
##
##
Just another Perl Hacker