Help for this page
#!/usr/local/bin/perl -w use strict;
open(FH, "<file.txt") or die "Could not open file.txt: $!\n";