File Coverage

lib/ExtUtils/MM_DOS.pm
Criterion Covered Total %
statement 3 7 42.9
branch n/a
condition n/a
subroutine 1 3 33.3
total 4 10 40.0


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