Select Code to Download

#!/usr/bin/perl
# parse.pl -- learning Parse::RecDescent ex.
...
        print "'$test' failed parser\n";
    }
}