#!/usr/bin/perl -w
# $Id:$
# Previous line for CVS
###############################################################
# Script for <Insert Use Here>                                #
# by Rex(Wrecks) (rex555@hotmail.com)                         #
# <Insert Date Here>                                          #
# Not for public use, creator takes no responsibilities for   #
# any damages, misconfigs or loss of sanity resulting from    #
# these script(s)                                             #
###############################################################

##########################
# Module `use`'s go here #
##########################
use strict ;


##########################################
# Global Declarations and Constants here #
# Should not be much here except DEBUG   #
##########################################
my $DEBUG = 0 ;



#########################
# Prototypes start here #
#########################



##############################
# Main Code loop Starts here #
##############################



############################
# Main Code loop Ends here #
############################



########################
# Functions Start here #
########################

############################################
# This function is for <use>               #
# It takes 2 args, a scalar and a hash ref #
############################################