($dum) = $str =~ /^.*abc\s(\d+)/s