Help for this page

Select Code to Download

Select or download this

#!/tool/bin/perl -w
use strict;
...
close(TEST_FILE);

printf("matched $match\n");

Select or download this
```
/foo/bar/baz/bat
```
Select or download this
```
    if ($_ =~ /\/(.+)?$/)
```