in reply to Perl problem

my ($n) = $s =~ /#EC2_([0-9]+)/;