Help for this page

Select Code to Download

Select or download this
```
123xxxx56543
```

Select or download this

my $asc = join '|', map {"$_(?=".(($_+1)%10).")"} (0..9);
my $dsc = join '|', map {"$_(?=".(($_+9)%10).")"} (0..9);
...
    my $longest = max map length, /((?:$asc)+)/g, /((?:$dsc)+)/g;
    print "$longest\n";
}