#!/usr/bin/perl -w
#
###############################################################
# Extra Modules should be declared here.                      #
# All these modules MUST be found on the server attempting to #
# call this script.                                           #
###############################################################
#
use strict ;                                         # Enforce private variables
use lib '/home/interface/scripts/Perl_Modules' ;     # Where ACC_Various lives
use lib '/home/interface/sectran/lib' ;              # Where SECTRAN lives
use sectran ;                                        # In-House FTP Perl Module
use Cwd ;                                            # Current Working Directory Module
use Mail::Sender;                                    # Email module
use File::Find ;
use File::chmod ;
use chgrp ;
#
print "\n\tMod Test Starts\n" ;
#
my $file = 'xxrctest' ;
chgrp save $file or die "\n\tNo kin n d min ::$!\n" ;
print "\n\tMod Test Ends\n" ;