#!/usr/bin/perl -I../lib
# Test loading the Perl modules we require


my $test =<<E_O_T;
use strict;                # Standard safety checks.
use English;               # Avoid $<, etc.
use Getopt::Long;          # For our argument parsing.
use IO::Socket;            # Socketing code.
use Env;                   # Only necessary to read $HOME.
use gnump3d::MD5;	 	   # For seeing if files change
use gnump3d::config;       # My configuration file reading module.
use gnump3d::files; 	   # My routines for working with files and dirs.
use gnump3d::oggtagreader; # Simplistic OGG Vorbis tag parsing.
use gnump3d::mp3info;	   # Local copy of MP3::Info.
use gnump3d::IP;           # Local copy of NetAddr::IP.
use gnump3d::lang::en;	   # English language module.
E_O_T

	eval( $test );
	if ( $@ )
	{
	#	print $@;
		exit( 1 );
	}
	exit 0;
