Commit | Line | Data |
40aef9d6 |
1 | #line 1 |
2 | package Module::Install::Win32; |
3 | |
4 | use strict; |
5 | use Module::Install::Base; |
6 | |
7 | use vars qw{$VERSION $ISCORE @ISA}; |
8 | BEGIN { |
472d4b1e |
9 | $VERSION = '0.67'; |
40aef9d6 |
10 | $ISCORE = 1; |
11 | @ISA = qw{Module::Install::Base}; |
12 | } |
13 | |
14 | # determine if the user needs nmake, and download it if needed |
15 | sub check_nmake { |
16 | my $self = shift; |
17 | $self->load('can_run'); |
18 | $self->load('get_file'); |
19 | |
20 | require Config; |
21 | return unless ( |
22 | $^O eq 'MSWin32' and |
23 | $Config::Config{make} and |
24 | $Config::Config{make} =~ /^nmake\b/i and |
25 | ! $self->can_run('nmake') |
26 | ); |
27 | |
28 | print "The required 'nmake' executable not found, fetching it...\n"; |
29 | |
30 | require File::Basename; |
31 | my $rv = $self->get_file( |
32 | url => 'http://download.microsoft.com/download/vc15/Patch/1.52/W95/EN-US/Nmake15.exe', |
33 | ftp_url => 'ftp://ftp.microsoft.com/Softlib/MSLFILES/Nmake15.exe', |
34 | local_dir => File::Basename::dirname($^X), |
35 | size => 51928, |
36 | run => 'Nmake15.exe /o > nul', |
37 | check_for => 'Nmake.exe', |
38 | remove => 1, |
39 | ); |
40 | |
41 | if (!$rv) { |
42 | die <<'END_MESSAGE'; |
43 | |
44 | ------------------------------------------------------------------------------- |
45 | |
46 | Since you are using Microsoft Windows, you will need the 'nmake' utility |
47 | before installation. It's available at: |
48 | |
49 | http://download.microsoft.com/download/vc15/Patch/1.52/W95/EN-US/Nmake15.exe |
50 | or |
51 | ftp://ftp.microsoft.com/Softlib/MSLFILES/Nmake15.exe |
52 | |
53 | Please download the file manually, save it to a directory in %PATH% (e.g. |
54 | C:\WINDOWS\COMMAND\), then launch the MS-DOS command line shell, "cd" to |
55 | that directory, and run "Nmake15.exe" from there; that will create the |
56 | 'nmake.exe' file needed by this module. |
57 | |
58 | You may then resume the installation process described in README. |
59 | |
60 | ------------------------------------------------------------------------------- |
61 | END_MESSAGE |
62 | } |
63 | } |
64 | |
65 | 1; |