$tmp="$TMP_DIR/"."Quotes$$"."$USTATUS{USERNAME}.ps"; $htmp="$HTMP_DIR/"."Quotes$$"."$USTATUS{USERNAME}.pdf"; $tmp2=$tmp; $tmp2=~s/\.ps$/\.pdf/gi; `>$tmp`; my $ctr=0; my $tlog="$Q::all_quotes"; $tlog=~s/:/ /g; &logme('Quotes-PDF', "Getting PDF for quotes $tlog"); print "Processing quotes "; foreach $id (reverse split /:/, $Q::all_quotes) { $ctr++; print " $id "; `htmldoc -t ps --header '' --no-numbered --size letter --bodycolor white --left .5in --right .5in --webpage "http://localhost/cgi-bin/po/index.cgi?session=$SESSION&user=$USTATUS{USERNAME}&qdetail=$id&noip=noip" >> $tmp`; } `ps2pdf $tmp $tmp2`;