Select Code to Download

use warnings;
use strict;
...
my $subs = $des->all;

print "$_\n" for @$subs;

BEGIN
new
...
_post_proc
_engine
_pod

use warnings;
use strict;
...
            print "\t$sub\n";
    }
}

t/test/files/sample.pm:
    one
...
    replace
    remove
    _vim_placeholder