Select Code to Download

sub MIME::Lite::new {
    my ($self, %params) = @_;
...
    ...
    goto $new;   # <--------------
}

    After the "goto", not even "caller" will be able to
    tell that this routine was called first.