Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

32 lines (23 sloc) 0.616 kB
#!/usr/bin/perl
use strict;
use vars qw(@MODULES);
use Test;
# $Id: 00_load.t,v 1.5 2002/01/19 09:54:30 rjray Exp $
# Verify that the individual modules will load
BEGIN
{
@MODULES = qw(RPC::XML RPC::XML::Parser
RPC::XML::Procedure RPC::XML::Method
RPC::XML::Client RPC::XML::Server
Apache::RPC::Server Apache::RPC::Status);
# If mod_perl is not available, Apache::RPC::Server cannot be blamed
eval "use Apache";
splice(@MODULES, -2) if $@;
plan tests => scalar(@MODULES);
}
for (@MODULES)
{
eval "use $_";
ok(! $@);
}
exit 0;
Jump to Line
Something went wrong with that request. Please try again.