Select Code to Download

        package Devel::Dumpcode;

...
        }

        1;

        #!/usr/bin/perl

...
        sub Gen_val {
          1;     # EDIT ME
        }

        perl -d:Dumpcode tryme.pl