Re: MySQL backup

Some points you may want to consider:

removing the redundant ( and ) in $query = (qq^SHOW DATABASES^)
using bound variables with bind_col and bind_columns
replacing grep { $_ =~ ".gz" } with grep { /\.gz$/ } or being lazing and using <*.gz>
using File::Path to remove directories in a portable way

Hope this helps...

gav^

Comment on Re: MySQL backup Select or Download Code

Replies are listed 'Best First'.
Re: Re: MySQL backup by penguinfuz (Pilgrim) on May 25, 2002 at 10:42 UTC
Thanks for the input gav^ ...removing the redundant ( and ) in $query = (qq^SHOW DATABASES^) Done, duhr! ;) *...replacing grep { $_ =~ ".gz" } with grep { /\.gz$/ } or being lazing and using <.gz> Done. Since I am already defining the ".gz" extension in a variable, I can just pass that information to the "clean_up()" routine, cool. ...using bound variables with bind_col and bind_columns ...using File::Path to remove directories in a portable way** ++ for giving me something new to learn about, cheers!	[reply]

Replies are listed 'Best First'.

Re: Re: MySQL backup
by penguinfuz (Pilgrim) on May 25, 2002 at 10:42 UTC

...removing the redundant ( and ) in $query = (qq^SHOW DATABASES^)

...replacing grep { $_ =~ ".gz" } with grep { /\.gz$/ } or being lazing and using <*.gz>

...using bound variables with bind_col and bind_columns

...using File::Path to remove directories in a portable way