SYNOPSIS
PERL PROGRAM NAME: susplit.pm
AUTHOR: Juan Lorenzo (Perl module only)
DATE: V0.2 6.19.23
DESCRIPTION:
Version:
USE
NOTES
There are now four cases that susplit can handle:
1. As in the traditional case, the split files are written to
the directory in which perl thinks the code is running.
2. If a list of su_base_file_names is given (in $DATA_SEISMIC_TXT)
split files are written to $DATA_SEISMIC_SU.
3. If an su_base_file_name is given then the split files are written
to $DATA_SEISMIC_SU.
4. Cases 2 and 3 are mutually exclusive and a warning message is given.
Examples
SYNOPSIS
SEISMIC UNIX NOTES SUSPLIT - Split traces into different output files by keyword value
susplit <stdin >stdout [options]
Required Parameters:
none
Optional Parameters:
key=cdp Key header word to split on (see segy.h)
stem=split_ Stem name for output files
middle=key middle of name of output files
suffix=.su Suffix for output files
numlength=7 Length of numeric part of filename
verbose=0 =1 to echo filenames, etc.
close=1 =1 to close files before opening new ones
Notes:
The most efficient way to use this program is to presort the input data
into common keyword gathers, prior to using susplit. "
Use "suputgthr" to put SU data into SU data directory format.
Credits:
Geocon: Garry Perratt hacked together from various other codes
CHANGES and their DATES
V0.0.2 06.13.23
Normally susplit writes divided files into the local directory. Now, split files are automatically moved into $the DATA_SEISMICS_SU directory.
Normally, susplit input consists of a single file. Now, user can enter the name of a list containing more than one file. Now, susplit will iterate over each file with the same general instructions.
Now, there is no need to use a data_in or data_out module. Now, susplit handles input and output internally.
Import packages
instantiation of packages
Encapsulated hash of private variables
sub Step
collects switches and assembles bash instructions by adding the program name move output data into the DATA_SEISMIC_UNIX directory
sub note
collects switches and assembles bash instructions by adding the program name
sub clear
_check4inbound_listNkey
sub close
sub key
sub list
list array
sub middle
sub numlength
sub stem
sub su_base_file_name
su_base_file_name
sub suffix
sub verbose
sub get_max_index
max index = number of input variables -1