Help for this page
$ perl -e '$str = "+000000"; $match = $str =~ /^\+\d{6}/; print "MATCH\n" if($match);'
MATCH