pugs> my $z= "abc12345we678"
"abc12345we678"
pugs> $z ~~ ?/\d+/
*** Cannot parse regex: \d+
*** Error: Error: Can't use string ("1") as a subroutine ref while "strict refs" in use at D:\pugs\perl5\Pugs-Compiler-Rule\lib/Pugs
/Compiler/Regex.pm line 85.

Bool::False
pugs>