Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

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.