Is this what you want?

perl6 -e 'say "12345" ~~ /^<+alnum -alpha>+$/'
「12345」

perl6 -e 'say "123a45" ~~ /^<+alnum -alpha>+$/'
Nil

HTH
  - Timo

Reply via email to