# Print the file my $full_filename="$workdir\\$viewfile"; my $avdoc = new Win32::OLE ('acrord32.AVDOC'); if (! $avdoc) { WriteLog("Error: unable to open Acrobat for printing."); print "acrobat=" . $avdoc . "\n"; goto PR_RESET; }