UNIX for Dummies Questions & Answers

#!/usr/bin/env bash

# @(#) s1	Demonstrate multiple processes simultaneously, with "GNU parallel".
# See: http://www.gnu.org/software/parallel
# See: http://freecode.com/projects/align

pe() { for _i;do printf "%s" "$_i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
db() { ( printf " db, ";for _i;do printf "%s" "$_i";done;printf "\n" ) >&2 ; }
db() { : ; }
C=$HOME/bin/context && [ -f $C ] && $C parallel tree

pl " Structure of directories:"
tree d1 
tree d2

pl " Results of parallel processes:"
# ls d1/* d2/* |
find d1 d2 -name '*.txt' |
parallel --jobs 0 --ungroup 'echo -n job {#}, process $$", wc = "; wc {}' 2>/dev/null |
align

exit 0

$ ./s1

Environment: LC_ALL = POSIX, LANG = POSIX
(Versions displayed with local utility "version")
OSX 10.3.9
GNU bash 2.05b.0
grep - ( /usr/bin/grep, 29 Aug 2008 )
parallel - ( local: ~/bin/parallel, 1 Nov 11:35 )
tree - ( local: RepRev 1.2, ~/bin/tree, 1 Nov 11:48 )

-----
 Structure of directories:
d1
`--a.txt
`--b.txt
`--binary-1.exe
`--c.txt
d2
`--frog-town.jpg
`--x.txt
`--y.txt

-----
 Results of parallel processes:
job 1, process 2620, wc =  4  16   70 d1/a.txt
job 2, process 2622, wc = 16  16  123 d1/b.txt
job 3, process 2624, wc = 26 265 1464 d1/c.txt
job 4, process 2626, wc =  4  16   70 d2/x.txt
job 5, process 2628, wc = 16  16  123 d2/y.txt

#Stage 1 Data Mode
#$runlist_size is number of files found in text file
#Analyze every other file starting with first
sub Stage1_DataMode
{
    for (my $i=0; $i<$runlist_size; $i=$i+2)
    {
        system "vaStage1 -Stage1_RunMode=data -config=${CONFIG}Stg1.config $VBFDIR$runlist[$i].cvbf ${OUTPUT}$runlist[$i].root";
    }
}

#Stage 1 Data Mode
#$runlist_size is number of files found in text file
#Analyze every other file starting with first
sub Stage1_DataMode
{
    for (my $i=0; $i<$runlist_size; $i=$i+2)
    {
        system "vaStage1 -Stage1_RunMode=data -config=${CONFIG}Stg1.config $VBFDIR$runlist[$i].cvbf ${OUTPUT}$runlist[$i].root &";
    }
}