perl -lne "print $_ . 'foo'"