Help for this page
Usage: ./exer_9_2 filename at ./exer_9_2 line 7.
if (! defined $in) { print "Usage: $0 <filename>\n"; exit(1); }