Help for this page
script.pl < file.txt
#!/usr/local/bin/perl -w ... print "The line is: $line\n"; }