Select Code to Download

# doesn't match
my ($span_m) = $str =~ /(\d\d.*?\d\d)/m;
...

# so does
my ($span_m) = $str =~ /(\d\d\w+\s\w+\d\d/m;