Help for this page

Select Code to Download


  1. or download this
    /^Current time =>\s(\d\d\d\d)(\d\d)(\d\d)\S(\d\d)(\d\d)(\d\d)/sx ;
  2. or download this
    >perl -wMstrict -le
"my $s = 'Current time => 123';
...
 print 'match 2' if $s =~ /Current [ ] time \s => \s+ 123/x;
"
match 2