$ perl -wle 'sub foo { print "@_"; } foo( 1..3 );' 1 2 3