view release on metacpan or  search on metacpan

t/simple_request.t  view on Meta::CPAN

#!/usr/bin/perl
# vim: syntax=perl

use strict;

# Check for Apache::FakeRequest, skip tests otherwise
eval "require Apache::FakeRequest;";
if ($@) {
	print "1..0 # Skip looks like Apache2, haven't updated test yet.\n";
	exit;
}

# Number of tests.
print "1..2\n";

undef $@;
eval "require Apache::GD::Graph;";
if ($@) {
	print "not ok 1\n";