#! perl -w use strict; use warnings; use Carp; use DBI; use DBD::Oracle qw(:ora_types); my %env_hash; my $os = 'solaris'; my $stringetje; my $temp; my @tempar; my @wkflist; my $PARAMETER; $env_hash{$os} = {parfile => '/ontw/data/powercenter8/PRJ10/BMRK.par', del => 'rm -f ', files => 'wf_BMRK*.out'}; open($PARAMETER, '<', "$env_hash{$os}{parfile}") or croak "\nCould not open parameterfile $env_hash{$os}{parfile}"; while($temp = <$PARAMETER>){ chomp($temp); @tempar = split /=/, $temp; if($tempar[0] eq "WKFLIST"){ @wkflist = split /,/,$tempar[-1]; } else{ $env_hash{$os}{$tempar[0]} = $tempar[-1]; } } close $PARAMETER; $stringetje = $env_hash{$os}{del} . $env_hash{$os}{LOGDIR} . $env_hash{$os}{files}; print "\n\n\n\n******************************************************\n"; print "\nFirst part of the concatenation: delete command : $env_hash{$os}{del}"; print "\nSecond part of the concatenation: path : $env_hash{$os}{LOGDIR}"; print "\nThird part of the concatenation: file wildcard : $env_hash{$os}{files}"; print "\nThe resulting concatenation: $stringetje"; print "\n******************************************************\n\n\n\n"; #### TIMES=4 LOGDIR=/ontw/log/powercenter8/PRJ10/ TMPDIR=/ontw/data/powercenter8/Tmp/PRJ10 FOLDER=BMRK SERVICE=IS_PRJ10 DOMAIN=Domain_ONT USER=Administrator PASSWORD=********** WKFLIST="wf_BMRK_File2File_Fixed","wf_BMRK_File2File_Fixed_No_Target","wf_BMRK_File2File_Delimited","wf_BMRK_File2File_Memory","wf_BMRK_File2File_CPU" ORAUSER=jamb_007 ORAPSW=********** ORACONNECT=dow02.ont.jon.mg #### ****************************************************** First part of the concatenation: delete command : rm -f Second part of the concatenation: path : /ontw/log/powercenter8/PRJ10/ Third part of the concatenation: file wildcard : wf_BMRK*.out wf_BMRK*.outg concatenation: rm -f /ontw/log/powercenter8/PRJ10/ ****************************************************** #### ****************************************************** First part of the concatenation: delete command : rm -f Second part of the concatenation: path : /ontw/log/powercenter8/PRJ10/ Third part of the concatenation: file wildcard : wf_BMRK*.out The resulting concatenation: rm - f /ontw/log/powercenter8/PRJ10/wf_BMRK*.out ******************************************************