[33014] in Perl-Users-Digest
Perl-Users Digest, Issue: 4290 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Sep 27 09:09:15 2014
Date: Sat, 27 Sep 2014 06:09:02 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 27 Sep 2014 Volume: 11 Number: 4290
Today's topics:
Open fail on ouput file <No-Spam@deezee.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 27 Sep 2014 11:06:28 +0000 (UTC)
From: "Dave Saville" <No-Spam@deezee.org>
Subject: Open fail on ouput file
Message-Id: <fV45K0OBJxbE-pn2-QhYJO6JwPd2n@paddington.bear.den>
I have a backup script that has been running for years without
problems this morning it threw the following:
[D:\bin]backup_incremental.pl
Starting incremental backup @ 2014_09_27_11_43_17
Cleaning C:
Searching for old incrementals of C
Incremental backup for C:
zip -@ -n
".z;.gz;.zip;.zoo;.arc;.lzh;.arj;.jar;.jpg;.jpeg;.mov;.avi;.gif;.epub"
-8 -S T:/Backup/PADDINGTON/2014_09_27_11_43_17_C.zip
Can't fork No such file or directory at backup_incremental.pl line
118.
print "\tIncremental backup for $backup_drive\n";
my $zip = sprintf "zip -@ -n
\".z;.gz;.zip;.zoo;.arc;.lzh;.arj;.jar;.jpg;.jpeg
;.mov;.avi;.gif;.epub\" -8 $S_flag %s/%s_%s.zip", $backup_host,
$backuptime, $drive;
print "$zip\n";
open my $ZIP, "|$zip" or die "Can't fork $!";
Anyone?
TIA
--
Regards
Dave Saville
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V11 Issue 4290
***************************************
