- To: slug@xxxxxxxxxxx
- Subject: Re: [SLUG] gzip from perl script
- From: "Voytek" <lists@xxxxxxxxxx>
- Date: Thu, 22 Sep 2005 14:10:23 +1000 (EST)
- User-agent: SquirrelMail/1.5.1 [CVS]
<quote who="Jacinta Richardson">
> Voytek wrote:
> My apologies. Although I do find that it's usually better to to assume
> that people who are asking about an existing Perl program are more often
> Perl
> literate than they are Perl newbies. :)
no need to apologize, I'm flattered
> On further thought you proably want to change this die to the following:
> warn "Failed to remove $database-$oldyear$oldmonth$oldday.sql.gz: $!";
>
> as failing to delete might not be important enough to stop doing all the
> backups.
yes, 'die' was a show stopper, 'warn' is better
(especially as I'm deleting 3 generations prior, anyhow)
I just need to force a 'y' here, or pass to gzip
...screen snip---
gzip: /backup/mysql/postfix-20050922.sql.gz already exists; do you wish to
overwrite (y or n)?
...
thanks for all the help,
--
Voytek