Select Code to Download

$ perl -le " $f = 1,2,3 ; print $f"
1

...
print $f;
-e syntax OK

$ perl -le " $f = ( 1,2,3 ); print $f"
3

...
$f = ('???', '???', 3);
print $f;
-e syntax OK