Nevermind, I figured it out.
I'm only passing the file name in the rename script, I had to add the whole
path to it.
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Thursday, July 26, 2001 1:42 PM
To: [EMAIL PROTECTED]
Subject: Renaming Files Help
I keep gett
On Thu, Jul 26, 2001 at 01:42:11PM -0500, [EMAIL PROTECTED] wrote:
> #!/usr/bin/perl -w
You forgot use strict. Always use strict when debugging code.
> #rename
> use File::Find;
> $DIRLIST = ('D:\PATH\To-Be Model\Data');
> find(\&process_file, $DIRLIST);
> rename_files();
>
> sub process_file