Help for this page

Select Code to Download

Select or download this

    if ($have_zip) {
        $basename =~ /(.*).zip/i;
...
        local $ENV{HOME} = undef;
        chdir($1);
    }