MM.pm revision 1
1N/AExtUtils::MM - OS adjusted ExtUtils::MakeMaker subclass 1N/A require ExtUtils::MM; 1N/A my $mm = MM->new(...); 1N/AB<FOR INTERNAL USE ONLY> 1N/AExtUtils::MM is a subclass of ExtUtils::MakeMaker which automatically 1N/Achooses the appropriate OS specific subclass for you 1N/A(ie. ExtUils::MM_Unix, etc...). 1N/AIt also provides a convenient alias via the MM class (I didn't want 1N/AMakeMaker modules outside of ExtUtils/). 1N/AThis class might turn out to be a temporary solution, but MM won't go $
Is{
VMS} =
1 if $^O
eq 'VMS';
$
Is{
OS2} =
1 if $^O
eq 'os2';
$
Is{
UWIN} =
1 if $^O
eq 'uwin';
$
Is{
BeOS} =
1 if $^O =~ /
beos/i;
# XXX should this be that loose?$
Is{
DOS} =
1 if $^O
eq 'dos';
my $
class =
"ExtUtils::MM_$OS";
die sprintf "Assert failed at %s line %d\n", (
caller)[
1,
2]
unless $
sanity;