Help for this page

Select Code to Download

Select or download this
```
b
*aaaaa...
1
...aaaaa...
```

Select or download this

#!/usr/bin/perl

...
    my $qr = qr/^$_$/;
    
    print $_ =~ $qr ? "YES" : "NO" for 'a' x (0 + 1e4) . 'a' x (9e4 - 
+1e4) . "\n";