DOCUMENTATION

SYNOPSIS

PERL PROGRAM NAME: data_in.pm 
AUTHOR: Juan Lorenzo (Perl module only)
DATE: 		June 22 2017
 

DESCRIPTION 
    

BASED ON:
Version 0.0.1 June 22 2017

Version 0.0.2 July 22 2018

Version 0.0.3 August 30 2021

USE

Use abbreviations such as bin sgy txt and su to automatically access directories that contain the types of files represented by these suffixes.

For example, all segy-type files are placed in the same directory If you want to find one of these files, place the parameter = sgy on the second line (suffix_type)

To automatically go to the segy-type directory, click on MB-3 while over the first parameter input (base_file_name)

NOTES

Examples

CHANGES and their DATES

Version 0.02 July 22 2018 added subs: 
	suffix_type, inbound  _get_inbound
	_get_suffix, _get_DIR
	
 Version 0.03  All file without a suffix
in which case the default PATH is the
path of PL_SEISMI	C

V 0.0.4 allows seros at start of file name

Notes from bash

Instantiation

Import Special Variables

private hash

subroutine _get_DIR

send PATH for suffix_type
suffix_type can be su txt sgy or su

subroutine _get_suffix

send PATH for suffix_type
suffix_type can be su, txt, sgy or su

subroutine clear

sets all variable strings to '' 

subroutine _get_inbound

suffix_type can be su txt sgy or su
if it is empty then assume that you are accessing
the local directory

subroutine Step

adds the program name

sub base_file_name

	has no suffix
  

sub base_file_name_sref

	has no suffix
  

sub full_file_name

	base plus suffix
  

subroutine get_inbound

suffix_type can be su txt sgy or su

sub get_max_index

max index = number of input variables -1

subroutine note adds the program name

subroutine type

suffix_type can be:
	bin
  sgy
	su 
	txt
	legacy: as of Oct 31, 2018

subroutine suffix_type

suffix_type can be:
	bin
  sgy
	su 
	txt