Help for this page

Select Code to Download

Select or download this
```
length == 9 and ! index $_, 5
```

Select or download this

$ perl -E '
    my @strings = qw{1 234 5 678 567890123 qwerty};
    say for grep +(length == 9 and ! index $_, 5), @strings;
'
567890123