t/00-load.t

   1 #!perl -T
   2
   3 use strict;
   4 use warnings;
   5
   6 use Test::More tests => 1;
   7
   8 BEGIN {
   9         use_ok( 'Variable::Magic' );
  10 }
  11
  12 my $p = Variable::Magic::VMG_PERL_PATCHLEVEL;
  13 $p = $p ? 'patchlevel ' . $p : 'no patchlevel';
  14 diag( "Testing Variable::Magic $Variable::Magic::VERSION, Perl $] ($p), $^X" );
  15
  16 if (eval { require ActivePerl; 1 } and defined &ActivePerl::BUILD) {
  17  diag "This is ActiveState Perl $] build " . ActivePerl::BUILD();
  18 }