test/run_plugin_tests.pl

   1 #!/usr/bin/perl
   2
   3 use strict;
   4 use warnings;
   5
   6 # to ensure consistent ctime values on all systems
   7 $ENV{TZ} = 'UTC';
   8
   9 use TAP::Harness;
  10
  11 my $harness = TAP::Harness->new( { verbosity => -1 });
  12 my $res = $harness->runtests(
  13     "archive_info_test.pm",
  14     "parse_volname_test.pm",
  15     "list_volumes_test.pm",
  16     "path_to_volume_id_test.pm",
  17     "get_subdir_test.pm",
  18     "filesystem_path_test.pm",
  19     "prune_backups_test.pm",
  20 );
  21
  22 exit -1 if !$res || $res->{failed} || $res->{parse_errors};