#!/usr/bin/perl -w # # Tests ProjectBuilder::Base functions use strict; use ProjectBuilder::Filter; eval { require Test::More; Test::More->import(); my ($tmv,$tmsv) = split(/\./,$Test::More::VERSION); if ($tmsv lt 87) { die "Test::More is not available in an appropriate version ($tmsv)"; } }; # Test::More appropriate version not found so no test will be performed here if ($@) { require Test; Test->import(); plan(tests => 1); print "# Faking tests as Test::More is not available in an appropriate version\n"; ok(1,1); exit(0); } my $nt = 0; is("1", "1", "pb Fake Test"); $nt++; done_testing($nt);