CPANPLUS-Shell-Wx

 view release on metacpan or  search on metacpan

inc/Module/Install/Fetch.pm  view on Meta::CPAN

    require Cwd;
    my $dir = Cwd::getcwd();
    chdir $args{local_dir} or return if exists $args{local_dir};

    if (eval { require LWP::Simple; 1 }) {
        LWP::Simple::mirror($args{url}, $file);
    }
    elsif (eval { require Net::FTP; 1 }) { eval {
        # use Net::FTP to get past firewall
        my $ftp = Net::FTP->new($host, Passive => 1, Timeout => 600);
        $ftp->login("anonymous", 'anonymous@example.com');
        $ftp->cwd($path);
        $ftp->binary;
        $ftp->get($file) or (warn("$!\n"), return);
        $ftp->quit;
    } }
    elsif (my $ftp = $self->can_run('ftp')) { eval {
        # no Net::FTP, fallback to ftp.exe
        require FileHandle;
        my $fh = FileHandle->new;

lib/CPANPLUS/Shell/Wx/res/PrefsWin.wxg  view on Meta::CPAN

                                <object class="CPANPLUS::Shell::Wx::Configure::TextCtrl" name="conf_cpantest_mx" base="EditTextCtrl">
                                    <tooltip>String holding an explicit mailserver to use when sending out emails for http://testers.cpan.org. An empty string will use your system settings. Defaults to an empty string.</tooltip>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <border>0</border>
                                <option>0</option>
                                <object class="wxStaticText" name="label_7" base="EditStaticText">
                                    <attribute>1</attribute>
                                    <label>Network Timeout:   </label>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <border>0</border>
                                <option>0</option>
                                <object class="CPANPLUS::Shell::Wx::Configure::SpinCtrl" name="conf_timeout" base="EditSpinCtrl">
                                    <tooltip>Digit indicating the time before a fetch request times out (in seconds). Defaults to 300.</tooltip>
                                    <range>0, 1000</range>
                                </object>

lib/CPANPLUS/Shell/Wx/res/PrefsWin.wxg~  view on Meta::CPAN

                                <object class="CPANPLUS::Shell::Wx::Configure::TextCtrl" name="conf_cpantest_mx" base="EditTextCtrl">
                                    <tooltip>String holding an explicit mailserver to use when sending out emails for http://testers.cpan.org. An empty string will use your system settings. Defaults to an empty string.</tooltip>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <border>0</border>
                                <option>0</option>
                                <object class="wxStaticText" name="label_7" base="EditStaticText">
                                    <attribute>1</attribute>
                                    <label>Network Timeout:   </label>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <border>0</border>
                                <option>0</option>
                                <object class="CPANPLUS::Shell::Wx::Configure::SpinCtrl" name="conf_timeout" base="EditSpinCtrl">
                                    <tooltip>Digit indicating the time before a fetch request times out (in seconds). Defaults to 300.</tooltip>
                                    <range>0, 1000</range>
                                </object>

lib/CPANPLUS/Shell/Wx/res/PrefsWin.xrc  view on Meta::CPAN

                            </object>
                            <object class="sizeritem">
                                <flag>wxEXPAND|wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <object class="wxTextCtrl" name="conf_cpantest_mx" subclass="CPANPLUS::Shell::Wx::Configure::TextCtrl">
                                    <tooltip>String holding an explicit mailserver to use when sending out emails for http://testers.cpan.org. An empty string will use your system settings. Defaults to an empty string.</tooltip>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <object class="wxStaticText" name="label_7">
                                    <label>Network Timeout:   </label>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <object class="wxSpinCtrl" name="conf_timeout" subclass="CPANPLUS::Shell::Wx::Configure::SpinCtrl">
                                    <min>0</min>
                                    <max> 1000</max>
                                    <tooltip>Digit indicating the time before a fetch request times out (in seconds). Defaults to 300.</tooltip>
                                </object>
                            </object>

lib/CPANPLUS/Shell/Wx/res/PrefsWin.xrc~  view on Meta::CPAN

                            </object>
                            <object class="sizeritem">
                                <flag>wxEXPAND|wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <object class="wxTextCtrl" name="conf_cpantest_mx" subclass="CPANPLUS::Shell::Wx::Configure::TextCtrl">
                                    <tooltip>String holding an explicit mailserver to use when sending out emails for http://testers.cpan.org. An empty string will use your system settings. Defaults to an empty string.</tooltip>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_RIGHT|wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <object class="wxStaticText" name="label_7">
                                    <label>Network Timeout:   </label>
                                </object>
                            </object>
                            <object class="sizeritem">
                                <flag>wxALIGN_CENTER_VERTICAL|wxADJUST_MINSIZE</flag>
                                <object class="wxSpinCtrl" name="conf_timeout" subclass="CPANPLUS::Shell::Wx::Configure::SpinCtrl">
                                    <min>0</min>
                                    <max> 1000</max>
                                    <tooltip>Digit indicating the time before a fetch request times out (in seconds). Defaults to 300.</tooltip>
                                </object>
                            </object>