xref: /openbsd-src/gnu/usr.bin/perl/cpan/Getopt-Long/t/gol-load2.t (revision 5486feefcc8cb79b19e014ab332cc5dfd05b3b33)
1#! perl
2
3# Verify that loading Getopt::Long::Parser also loads Getopt::Long.
4
5BEGIN {
6    if( $ENV{PERL_CORE} ) {
7        chdir 't';
8        @INC = ('../lib', 'lib');
9    }
10    else {
11        unshift @INC, 't/lib';
12    }
13}
14
15use strict;
16use warnings;
17use Test::More tests => 3;
18
19use_ok("Getopt::Long::Parser");
20
21# Getopt::Long should have been loaded as well.
22ok( defined $Getopt::Long::VERSION,
23    "Getopt::Long::Parser loads Getopt::Long" );
24
25# Verify version match.
26is( $Getopt::Long::VERSION, $Getopt::Long::Parser::VERSION,
27    "Parser version matches" );
28