#! /usr/bin/perl

$str = <<HERE ;
abc 10
abc 11
abc 12
abc 13
abc 14
HERE


($dum)  = $str =~/\d+$/gs ;

print "dum is $dum\n" ;
[download]

does it work ?

zak