Perl One Liners

* -n loop over input * -l strip newlines on input, but print them out with output * -a enable autosplit, resulting in array @F