Select Code to Download

open(my $fh, '|-', "tail", "-n", "+$InStartLineNumber", $InLogFIlePath
+)
      or die("Can't tail \"$InLogFIlePath\": $!\n");
...
if ( $? == -1  ) { die "Can't tail \"$InLogFIlePath\": $!\n"); }
if ( $? & 0x7F ) { die "Can't tail \"$InLogFIlePath\": Killed by signa
+l ".( $? & 0x7F )."$!\n"); }
if ( $? >> 8   ) { die "Can't tail \"$InLogFIlePath\": Exited with err
+or ".( $? >> 8 )."$!\n"); }

open(my $fh, '<', $InLogFIlePath) 
   or die("Can't open \"$InLogFIlePath\": $!\n");
...
   next if $. < $InStartLineNumber;
   ...
}