initialize shared anonymous hash

key/value pairs

sub get_section

	final assemblage of text for perl script
	this section covers the defined flows
	Removed in V 0.0.2:
	if ( ($prog_name[$prog_idx] ne 'data_in') &&  ($prog_name[$prog_idx] ne 'data_out') ) { 
   12.3.20 corrected symbol at index 3
  

sub set_message (widget)

sub set_prog_names_aref

sub set_prog_version_aref print("oop_flows,set_prog_version_aref,prog_version_aref=@{$hash_aref->{_prog_version_aref}}\n");

sub set_specs

	if first program is data_in
    switch with the second program in the list that 
    moves to first location in the flow

	if second file is data_in then OK
	do nothing set symbol to '<' ($in)
	 
	if there is only one item in a flow, do not run the flow

    my $num_progs4flow   =	$oop_flows->{_num_progs4flow};
    
    First program has index=0

STEP 1

If data_in is first program in flow
REVERSE first two items in the flow
i.e., switch the order of the program and data_in

Using corrected names and versions (from STEP 1), arrange symbols within a flow sequence. Estimate first the redirect and pipe sequences arrange programs and symbols (>,<,|) in order.