echo -e "one\ntwo\nthree" | perl -ne 'INIT{$tmp = shift} print "$tmp -> $_"' 42