Select Code to Download

$s="1 x 2 y";
@a = $s;
...
print "\%h: %h\n";

print "\%h: ", %h, "\n";

$s: 1 x 2 y
@a: 1 x 2 y
%h: %h
%h: 1 x 2 y