Select Code to Download

perl -ne 'print if / (\S) \1 \1$/' data.txt

perl -ne 'print if / (\S) \1 \1$/' data.txt > second.file

perl -e 'print "hello world\n"'

perl -ne 'print "hello world. Look at this: $_"' data.txt