Select Code to Download

# Somewhere very visible...
my @autosubs;
...
    }
    # ... and ends here
}

BEGIN {
    my @stdFuncs = qw(prepare prepare_cached do quote);
...
        };
    }
}

sub get {
    my ($self, $key) = @_;
...
    
    return 1;
}