Select Code to Download

salva   => sub { (my $dum) = $str =~ /^.*abc\s(\d+)/s; },
thedoe1 => sub { (my $dum) = $str =~ /(?<!abc).*abc\s(\d+)/gs; },