4 if( $ENV{PERL_CORE} ) {
15 @Methods = (qw(wraplist
25 replace_manpage_separator
68 plan( tests => @Methods + 1 );
71 plan( skip_all => "This is not VMS" );
75 use_ok( 'ExtUtils::MM_VMS' );
77 foreach my $meth (@Methods) {
78 can_ok( 'ExtUtils::MM_VMS', $meth);