Help for this page
#!/usr/bin/perl use strict; ... $_ = <STDIN>; if ( /^y/i ) { print "Phew!\n" } else { print "I don't believe you!\n"}
perl myscript.pl random_file.txt