Select Code to Download

my @a = (1 => 2 => 3 => 4);
print "$_\n" for @a;

(arg1=>$blah, arg2=>$blah2)

( 'arg1' , $blah , 'arg2' , $blah2 )