File Coverage

lib/ExtUtils/MM_DOS.pm
Criterion Covered Total %
statement 6 11 54.5
branch n/a
condition n/a
subroutine 2 5 40.0
pod 3 3 100.0
total 11 19 57.8


line stmt bran cond sub pod time code
1             package ExtUtils::MM_DOS;
2              
3 1     1   5273 use strict;
  1         2  
  1         31  
4 1     1   5 use warnings;
  1         2  
  1         236  
5              
6             our $VERSION = '7.66';
7             $VERSION =~ tr/_//d;
8              
9             require ExtUtils::MM_Any;
10             require ExtUtils::MM_Unix;
11             our @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix );
12              
13              
14             =head1 NAME
15              
16             ExtUtils::MM_DOS - DOS specific subclass of ExtUtils::MM_Unix
17              
18             =head1 SYNOPSIS
19              
20             Don't use this module directly.
21             Use ExtUtils::MM and let it choose.
22              
23             =head1 DESCRIPTION
24              
25             This is a subclass of L<ExtUtils::MM_Unix> which contains functionality
26             for DOS.
27              
28             Unless otherwise stated, it works just like ExtUtils::MM_Unix.
29              
30             =head2 Overridden methods
31              
32             =over 4
33              
34             =item os_flavor
35              
36             =cut
37              
38             sub os_flavor {
39 0     0 1   return('DOS');
40             }
41              
42             =item B<replace_manpage_separator>
43              
44             Generates Foo__Bar.3 style man page names
45              
46             =cut
47              
48             sub replace_manpage_separator {
49 0     0 1   my($self, $man) = @_;
50              
51 0           $man =~ s,/+,__,g;
52 0           return $man;
53             }
54              
55             =item xs_static_lib_is_xs
56              
57             =cut
58              
59             sub xs_static_lib_is_xs {
60 0     0 1   return 1;
61             }
62              
63             =back
64              
65             =head1 AUTHOR
66              
67             Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix
68              
69             =head1 SEE ALSO
70              
71             L<ExtUtils::MM_Unix>, L<ExtUtils::MakeMaker>
72              
73             =cut
74              
75             1;