................. my @dir = ("$VTIERBASE/pvc/ohdr/topology","$VTIERBASE/pvc/ohdr/instance-0/preprocess"); foreach my $SRC_DIR(@dir) ............................. #---------------------------------------------------------------------- # Validate the parameters #---------------------------------------------------------------------- my $file_cnt= scalar(@feed_files); logNdie "$PROGNAME: ERROR: Invalid number of feed files specified ($file_cnt). 8 are required!\n" unless $file_cnt == 8; # Build the complete path if not fully specified $DONE_DIR = "$VTIERBASE/pvc/ohdr/instance-0/cucp/$DONE_DIR" unless $DONE_DIR =~ m|^/|; $SRC_DIR = "$VTIERBASE/pvc/ohdr/topology/$SRC_DIR" unless $SRC_DIR =~ m|^/|;

I am not sure how to use $SRC_DIR here

$DST_DIR = "$VTIERBASE/pvc/ohdr/instance-0/processed/$DST_DIR" unless $DST_DIR =~ m|^/|; # DST_DIR is where we output results ......................... exit 0; }