Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use common::sense;
...
TOP_PATTERN
8
9

Select or download this
```
TOP_PATTERN
4
...
6
SEARCH_PATTERN
7
```