Help for this page

Select Code to Download

Select or download this

my $match1 = "^$datestring\s+\d{2}:\d{2}:\d{2},\d{3}\s+-\s+\d{2}:\d{2}
+:\d{2},\d{3}\s+$SLEVEL1";
use Data::Dumper;
...
__END__

$VAR1 = "^2017-01-04s+d{2}:d{2}:d{2},d{3}s+-s+d{2}:d{2}:d{2},d{3}s+ERR
+OR";

Select or download this

my $match1 = qr/^$datestring\s+\d{2}:\d{2}:\d{2},\d{3}\s+-\s+\d{2}:\d{
+2}:\d{2},\d{3}\s+$SLEVEL1/;