Select Code to Download

#! perl
use strict;
...
    $line =~ s/(?<=[0-9]{2})(?=[0-9]{2})/ /g;
    die unless $line eq $target;
}

 1:19 >perl 1307_SoPW.pl
                  Rate    capture lookaround
...
lookaround 133333333/s        52%         --

 1:20 >