1package ExtUtils::MM_DOS; 2 3use strict; 4use vars qw($VERSION @ISA); 5 6$VERSION = 0.02; 7 8require ExtUtils::MM_Any; 9require ExtUtils::MM_Unix; 10@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 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=back 55 56=head1 AUTHOR 57 58Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix 59 60=head1 SEE ALSO 61 62L<ExtUtils::MM_Unix>, L<ExtUtils::MakeMaker> 63 64=cut 65 661; 67