cpan/autodie/t/version.t

   1 #!/usr/bin/perl -w
   2 use strict;
   3 use Test::More tests => 4;
   4
   5 # For the moment, we'd like all our versions to be the same.
   6 # In order to play nicely with some code scanners, they need to be
   7 # hard-coded into the files, rather than just nicking the version
   8 # from autodie::exception at run-time.
   9
  10 require Fatal;
  11 require autodie;
  12 require autodie::hints;
  13 require autodie::exception;
  14 require autodie::exception::system;
  15
  16 is($Fatal::VERSION, $autodie::VERSION);
  17 is($autodie::VERSION, $autodie::exception::VERSION);
  18 is($autodie::exception::VERSION, $autodie::exception::system::VERSION);
  19 is($Fatal::VERSION, $autodie::hints::VERSION);