Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl

...
};

/(test\d)/ && $action_for{$1}->($_) for @tests;

Select or download this

*** Input: test1
Test 1 code
...
*** Input: Gtest2H
Test 1 code
Test 2 code