Help for this page
my $fh = FileHandle->new($file) or die "cannot read open $file"; my $row = <$fh>; print "|$row|\n";
| !D A I L Y R E P O R T |