Select Code to Download

open my $fh1, '<', "/tmp/host/mon2a" or die "unable to open file 'file
+' for reading : $!";
my @lines = <$fh1>;
close $fh1;