steve@spek ~/scratch $ perl -wMstrict -M5.010 -ae 'say $F[0]' test.dat
foo
baz