<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Greetings.<div><br></div><div>I could use a pointer on getting a script to work under Windows Task Scheduler.</div><div><br></div><div>ActivePerl 5.14</div><div>Gpg4win 2.1.0</div><div><br></div><div>Windows Server 2008 R2</div><div><br></div><div>The script works flawlessly from the command line, but will not run under Task Scheduler. Task Scheduler reports that it ran successfully...</div><div><br></div><div>Script:</div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">BEGIN {</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><span class="Apple-tab-span" style="white-space:pre"> </span>use Win32 qw( SW_HIDE );</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><span class="Apple-tab-span" style="white-space:pre"> </span>Win32::SetChildShowWindow( SW_HIDE );</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">}</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">use strict;</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">use warnings;</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">my $log = "decrypt.log";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">close ( STDOUT );</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">open ( STDOUT, ">>$log" );</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">close (STDERR );</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">open (STDERR, ">>$log" );</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># The below are commented out as I am entering them directly on the command line for troubleshooting purposes.</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $data_file = "TEST_FILE.txt.pgp";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $incoming_dir = "C:<a href="smb://Users//Public//TEST//Incoming">\\Users\\Public\\TEST\\Incoming</a>";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $data = "C:<a href="smb://Users//Public//TEST//Incoming//TEST_FILE.txt.pgp">\\Users\\Public\\TEST\\Incoming\\TEST_FILE.txt.pgp</a>";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $output_file = $data_file;</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># $output_file =~ s/\.pgp//;</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $data_dir = "C:<a href="smb://Users//Public//TEST//Data">\\Users\\Public\\TEST\\Data</a>";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $output = "C:<a href="smb://Users//Public//TEST//Data//TEST_FILE.txt">\\Users\\Public\\TEST\\Data\\TEST_FILE.txt</a>";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $sec_keyring = "C:<a href="smb://Users//Administrator//AppData//Roaming//gnupg//secring.gpg">\\Users\\Administrator\\AppData\\Roaming\\gnupg\\secring.gpg</a>";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"># my $pub_keyring = "C:<a href="smb://Users//Administrator//AppData//Roaming//gnupg//pubring.gpg">\\Users\\Administrator\\AppData\\Roaming\\gnupg\\pubring.gpg</a>";</font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;"><br></font></div><div><font class="Apple-style-span" face="'Courier New'" style="font-size: 12px;">system ( "gpg2.exe --batch --yes --passphrase-fd 0 --output C:<a href="smb://Users//Public//TEST//Data//TEST_FILE.txt">\\Users\\Public\\TEST\\Data\\TEST_FILE.txt</a> --no-default-keyring --keyring C:<a href="smb://Users//Administrator//AppData//Roaming//gnupg//pubring.gpg">\\Users\\Administrator\\AppData\\Roaming\\gnupg\\pubring.gpg</a> --secret-keyring C:<a href="smb://Users//Administrator//AppData//Roaming//gnupg//secring.gpg">\\Users\\Administrator\\AppData\\Roaming\\gnupg\\secring.gpg</a> --exit-on-status-write-error --decrypt C:<a href="smb://Users//Public//TEST//Incoming//TEST_FILE.txt.pgp">\\Users\\Public\\TEST\\Incoming\\TEST_FILE.txt.pgp</a> < passphrase.txt" );</font></div><div><br></div><div><div apple-content-edited="true">
<div style="font-size: 14px; ">Would truly appreciate any insight or pointers...</div><div style="font-size: 14px; "><br></div><div style="font-size: 14px; ">Scott...</div><div style="font-size: 14px; "><br></div><div style="font-size: 14px; "><br></div><br class="Apple-interchange-newline">
</div>
<br></div></div></body></html>