cpan/Test-Simple/t/versions.t

   1 #!/usr/bin/perl -w
   2
   3 # Make sure all the modules have the same version
   4 #
   5 # TBT has its own version system.
   6
   7 use strict;
   8 use Test::More;
   9
  10 require Test::Builder;
  11 require Test::Builder::Module;
  12 require Test::Simple;
  13
  14 my $dist_version = Test::More->VERSION;
  15
  16 like( $dist_version, qr/^ \d+ \. \d+ $/x );
  17
  18 my @modules = qw(
  19     Test::Simple
  20     Test::Builder
  21     Test::Builder::Module
  22 );
  23
  24 for my $module (@modules) {
  25     is( $dist_version, $module->VERSION, $module );
  26 }
  27
  28 done_testing(4);