1package ExtUtils::MM_DOS; 2 3use strict; 4 5our $VERSION = '7.44'; 6$VERSION =~ tr/_//d; 7 8require ExtUtils::MM_Any; 9require ExtUtils::MM_Unix; 10our @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix ); 11 12 13=head1 NAME 14 15ExtUtils::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 24This is a subclass of L<ExtUtils::MM_Unix> which contains functionality 25for DOS. 26 27Unless 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 37sub os_flavor { 38 return('DOS'); 39} 40 41=item B<replace_manpage_separator> 42 43Generates Foo__Bar.3 style man page names 44 45=cut 46 47sub replace_manpage_separator { 48 my($self, $man) = @_; 49 50 $man =~ s,/+,__,g; 51 return $man; 52} 53 54=item xs_static_lib_is_xs 55 56=cut 57 58sub xs_static_lib_is_xs { 59 return 1; 60} 61 62=back 63 64=head1 AUTHOR 65 66Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix 67 68=head1 SEE ALSO 69 70L<ExtUtils::MM_Unix>, L<ExtUtils::MakeMaker> 71 72=cut 73 741; 75