This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
SIGRTMAX, SIGRTMIN, LDBL_MAX, LDBL_MIN, LDBL_EPSILON and HUGE_VAL
[perl5.git] / lib / ExtUtils / MM_DOS.pm
1 package ExtUtils::MM_DOS;
2
3 use strict;
4 use vars qw($VERSION @ISA);
5
6 $VERSION = 0.02;
7
8 require ExtUtils::MM_Any;
9 require ExtUtils::MM_Unix;
10 @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix );
11
12
13 =head1 NAME
14
15 ExtUtils::MM_DOS - DOS specific subclass of ExtUtils::MM_Unix
16
17 =head1 SYNOPSIS
18
19   Don't use this module directly.
20   Use ExtUtils::MM and let it choose.
21
22 =head1 DESCRIPTION
23
24 This is a subclass of ExtUtils::MM_Unix which contains functionality
25 for DOS.
26
27 Unless otherwise stated, it works just like ExtUtils::MM_Unix
28
29 =head2 Overridden methods
30
31 =over 4
32
33 =item os_flavor
34
35 =cut
36
37 sub os_flavor {
38     return('DOS');
39 }
40
41 =item B<replace_manpage_separator>
42
43 Generates Foo__Bar.3 style man page names
44
45 =cut
46
47 sub replace_manpage_separator {
48     my($self, $man) = @_;
49
50     $man =~ s,/+,__,g;
51     return $man;
52 }
53
54 =back
55
56 =head1 AUTHOR
57
58 Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix
59
60 =head1 SEE ALSO
61
62 L<ExtUtils::MM_Unix>, L<ExtUtils::MakeMaker>
63
64 =cut
65
66 1;