Help for this page

Select Code to Download

Select or download this
```
#!/usr/bin/perl -l

...
}

__END__
```
Select or download this
```
$dispatch{"test$_"}->() for 1,2;
```

Select or download this

#!/usr/bin/perl -l

...
$_->() for @test;

__END__