Help for this page

Select Code to Download


  1. or download this
    if ($line1 =~ m/^Start/) {
    # Append the rest of the record
    $line1 .= <LOGFILE> for 1..7;
}
  2. or download this
    if ($line1 =~ m/^Start/) {
    # Skip to the end of the record
    my $t = <LOGFILE> for 1..6;
    my $lastline = <LOGFILE>;
}