DOCUMENTATION

SYNOPSIS Contains methods/subroutines/functions to operate on directories

PROGRAM NAME: manage_files_by  classIVA 
AUTHOR: Juan Lorenzo
DATE:   V 1. March 3 2008
V 2 May 27 2014
        
DESCRIPTION: 
modified from
manage_files_by  to stricts requirements using Moose
manage_files_by  class

=head2 USE

NOTES

Examples

NOTES

CHANGES and their DATES

Instantiate

modules

clear memory

define private hash to share

sub clear

Clear all memory

sub _exists

Another (private) way to see if a file exists input is a scalar

sub _read_2cols

read in a 2-columned file
reads cols 1 and 2 in a text file

sub _set_pathNfile

sub clean

delete a pre-existing file directory of a file

sub _delete

This (provate) function/method deletes files

sub clear_empty_files

sub count_lines

this function counts the numbers of lines in a text file

sub delete

This function/method deletes files

sub does_file_exist

sub exists

Another way to see if a file exists input is a scalar

sub get_3cols_aref

This function reads 3 cols in a text file

sub get_5cols_aref

this function reads 5 cols in a text file

sub get 1 column

sub get_base_file_names_aref

read a list of file names remove the su suffix return array reference of the list of names without su suffixes

open and read
the complete file
line by line
   #print ("lines are @{$manage_files_by2->{_all_lines_aref}}\n"); 
   print ("We seem to have $manage_files_by2->{_num_lines} lines total\n");

sub set_directory

sub set_file_in

sub set_inbound_list

read a 1-column file

read in a 2-columned file
reads cols 1 and 2 in a text file

read in a 2-columned file
reads cols 1 and 2 in a text file

read in a 2-columned file
reads cols 1 and 2 in a text file

sub read_tx_curves2plot

Define

private hash

Define

curve color

Collect

curve data

sub read_par

read parameter file
file name is a scalar reference (to 
scalar file name)
o/p includes array of array references

1. open file

2. set the counter

3. read contents of parameter file

4. odd-numbered lines contain tnmo and even contain vnmo

1. remove end of line
2. calculate number of useful elements
2. only leave the numbers with commas in between:
	e.g. things=tnmo 0.0567282,0.271768
	N.B. these are only 2 things and not 3 things

sub set_appendix

set file for catting

sub set_pathNfile

sub set_cat_base_file_name_out

sub set_cat_su

append individual output files to a major product file

SYNOPSIS

PERL PROGRAM NAME:

AUTHOR:

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES

CHANGES and their DATES

Declare

local variables

Set up

cat_su parameter values

Set up

data_out parameter values

DEFINE FLOW(s)

RUN FLOW(s)

LOG FLOW(s)

to screen and FILE

sub set_cat_txt

append individual output files to a major product file

SYNOPSIS

PERL PROGRAM NAME:

AUTHOR:

DATE:

DESCRIPTION:

Version:

USE

NOTES

Examples

SYNOPSIS

SEISMIC UNIX NOTES

CHANGES and their DATES

Declare

local variables

Set up

cat_txt parameter values

Set up

data_out parameter values

DEFINE FLOW(s)

RUN FLOW(s)

LOG FLOW(s)

to screen and FILE

sub set_delete_base_file_name

sub suffix_type

geometry values

filter out only unique elements from an array

write out a 1-column file

write out a 1-columned file

write out a 2-columned file

sub write_5cols

WRITE OUT FILE open and write to output file

sub write_par

write parameter file
file name is a scalar reference to 
scalar file name

local definitions

odd-numbered lines contain tnmo and even contain vnmo
e.g., tnmo=1,2,3
	   vnm==4,5,6

open and write values

sub write_multipar

write parameter file
file name is a scalar reference to 
scalar file name

local definitions

odd-numbered lines contain tnmo and even contain vnmo
e.g., tnmo=1,2,3
	   vnm==4,5,6

open and write values

cpanm App::SeismicUnixGui

perl -MCPAN -e shell
install App::SeismicUnixGui