The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl -w

BEGIN {
    eval {
        require Wx::build::MakeMaker;
    };
    if($@){
        warn "Warning: prerequisite Wx::build::MakeMaker not found.\n";
        warn "Warning: you need to install wxPerl (http://wxPerl.sf.net).\n";
        exit 1;
    }
}

use ExtUtils::MakeMaker qw[ prompt ];
use strict;


print q[

    Set DO_NET_TEST=1 in your ENV if you want to test
    this module and you're connected to the internet.
    (what it will try to do is disconnect you if you're on dialup).

];

$ENV{WXDIR} = $ENV{WXWIN} if $ENV{WXWIN};
$ENV{WXDIR} = $ENV{WXWIN} if $ENV{WXDIR};

unless( $ENV{WXDIR} or $ENV{WXWIN} ) {
    $ENV{WXWIN} = prompt('Where is WXWIN? (aka WXDIR) ', findWxwin() );
    $ENV{WXDIR} = $ENV{WXWIN};
}

$ENV{WXWIN} = $ENV{WXDIR};

print qq[
using:
    WXWIN => $ENV{WXWIN}
    WXDIR => $ENV{WXDIR}

];


Wx::build::MakeMaker::wxWriteMakefile(
    NAME         => 'Wx::DialUpManager',
    VERSION_FROM => 'DialUpManager.pm',
    PREREQ_PM    => {
        'Test'  => 0,
        'Test::More' => 0,
    },
);


sub findWxwin {
    my @dirs;
    for('c'..'z'){
        my @files = glob $_.':/wxWindows*';
        push @dirs,@files if @files;
    }
    return shift @dirs;
}

__END__
perl Makefile.PL && nmake realclean && cls && perl Makefile.PL && nmake test
cpan-upload -mailto yo@yo.yo -verbose -user podmaster  Wx-DialUpManager-0.03.tar.gz