Select Code to Download

my $in_file = 'b2bclient-gateway-heartbeat.log';
open my $in_fh, '<', $in_file or die "Could not open file $in_file: $!
+";
...

close $in_fh  or die "Could not close file $in_file: $!";
close $out_fh or die "Could not close file $out_file: $!";