DOCUMENTATION
SYNOPSIS
PERL PROGRAM NAME: System_Variables_config.pl
AUTHOR: Juan Lorenzo
DATE: July 29 2016
DESCRIPTION Combines configuration variables
both from a simple text file and from
from additional packages.
USED FOR
Upper-level variable
definitions in iTop_Mute3
Seismic data is assumed currently to be in
su format.
BASED ON:
Version 1 Based on linux command "cat"
Version 2 based on Sucat.pm June 29 2016
Added a simple configuration file readable
and writable using Config::Simple (CPAN)
Oct. 19 2016
Version 2.1 Includes option for multiple users in every directory
Needs: Simple (ASCII) local configuration
file is Project_Variables.config
Notes
Simple reads configuration file and
cretes a hash with parameters (keys/names) and
their values as assigned inside the configuration
file
anonymous hash array reference $CFG class: cfg method: param returns: value
contains all the configuration variables in
perl script
HOME ='/home/gom';
PROJECT_HOME = '/FalseRiver';;
site = 'Bueche';
spare_dir = '';
date = '051216';
component = 'H';
line = '1';
subUser = 'gom';
print("home is $CFG[2]\n\n");