test1.pl

#!/usr/bin/perl
use English;
use POSIX qw( :stdlib_h strftime getcwd );
use Getopt::Std;
use FileHandle;
use strict vars;
use File::Basename;

eval "use CVSClient";

use Syslog;  # homegrown version
use SSSourceOrg qw( getLibExts getLibDirs );
use SSMail qw( send );