Select Code to Download

#!/usr/bin/perl
# recurse.pl -- Aid to Parse::RecDescent builders
...
        }
    }
}

$>recurse
$VAR1 = 'level0';
...
                                         |....]
                                         |..]
                                         |]