$_=~ /^' PJOB='(.*)' PSET='(.*)' PJNO='(.*)' WORKDAY='/; $predlnr=$3; $predlnr =~ s/^00//; $jobstation=$jobsetstation{$2}; print "follows $jobstation\#$2.${1}_$predlnr\n\n\n";