Help for this page

Select Code to Download

Select or download this

#!/usr/bin.perl -w
use strict;
...
@digits = ($test =~ m/^(.{4,5})$/); 
print "digits = @digits\n";
#prints digits =

Select or download this
```
digits = 1234
digits = 12345
digits =
```