in reply to Pattern mattching

$a=~m#\+\d{6}#

[download]

In Section Seekers of Perl Wisdom