my %hash = (one => 1, two => 2);
  print "$hash{one}\n";

##</code><code>##

  print "@{[ %hash ]}\n";

##</code><code>##

  print "@{ for (1 .. 2) { print qq(Hi!\n); } [ qq(Bye!\n) ]}";