package MY; # so that "SUPER" works right sub dist { # SAVE WHAT RECEIVED BY THE ORIGINAL dist my $inherited = $_[0]->SUPER::dist(@_); my $ask_for_git = main::prompt ("*** CUSTOM *** Do you want to specify a git repository?:"); if ( $ask_for_git =~ /^y/i ){ ...