t/07_ncal.t

   1 #!/usr/bin/perl
   2
   3 use strict;
   4 use FindBin;
   5 use lib $FindBin::RealBin;
   6
   7 use testload;
   8
   9 my($test_count, $method);
  10 BEGIN {
  11   $method = 'ncal';
  12   $test_count = bulk_count() + odd_count() + woy_count() + 3;
  13 }
  14
  15 use Test::More tests => $test_count;
  16
  17 use constant DTC => 'HTML::CalendarMonth::DateTool';
  18
  19 use_ok(DTC);
  20
  21 SKIP: {
  22   skip("$method not installed", $test_count - 1) unless DTC->_ncal_cmd;
  23   check_datetool($method);
  24   check_bulk_with_datetool($method);
  25   check_odd_with_datetool($method);
  26   check_woy_with_datetool($method);
  27 }