Select Code to Download

#! perl -slw
use strict;
...
   1.4.999  < 1.5.0

C:\test>

map2{ print $a, $b; } qw[a b c d];