Actually I think this might work>
$add =~ s/(91)(\d+)?/$2/; [download]
In reply to Re^9: Create output from Perl hash by gbwien in thread Create output from Perl hash by gbwien