my $string = join q{ }, q(Hello), q/world/;

##</code><code>##

my %hash;
$hash{foo} = 42;
@hash{ 'bar', 'baz' } = ( 666, 999 );

##</code><code>##

say "\N{DROMEDARY CAMEL}";
say "\x{1F42A}";