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
I keep getting an error when I run this script -
No such file or directory.
What am I missing?
#!/usr/bin/perl -w
#rename
use File::Find;
$DIRLIST = ('D:\PATH\To-Be Model\Data');
find(\&process_file, $DIRLIST);
rename_files();
sub process_file{
push (@files, $_);
};
sub rename_files{
Why add another module when one regexp can do it? ;)
-Original Message-
From: Mel Matsuoka [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, July 24, 2001 5:17 AM
To: [EMAIL PROTECTED]
Subject: RE: basename ?
At 01:48 PM 07/24/2001 -0500, Mooney Christophe-CMOONEY1 wrote:
>Why not just use a r
There's also the procedure in Mastering Regular Expressions:
(lifted from The Perl Cookbook)
[CODE FOLLOWS]
sub parse_csv{
my $text = shift; #record containing comma sep values
my @new = ();
push(@new, $+) while $text =~ m{
#the first part groups the phase
it's a pragma.
It forces explicit declaration of variables, among other things.
One of the smarter people here can tell you the exact details of it.
-Original Message-
From: Tom Malone [mailto:[EMAIL PROTECTED]]
Sent: Friday, July 20, 2001 1:42 PM
To: Perl List
Subject: RE: stupid quest
I need to develop an output format for a report.
The issue is that it's a one to many relationship in terms of reporting.
I.e.
FIRST TERM
---
FIRST MATCH TO FIRST TERM
SECOND MATCH TO FIRST TERM
SECOND TERM
--
FIRST MATCH TO SECOND TERM
THIRD TERM
---
"safe", though?
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Friday, June 08, 2001 10:47 AM
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: Printing a hash - weird behavior
>>>>> "jbarry" == jba
The code is below; what's pertinent is really the last line.
When I drop the ."\n" the hash prints as expected, but with no line breaks
between records. Assuming concactenating the \n would do it, I threw it into
the print command.
Now it returns a value of 2/8 instead of the hash values. . . what
OK first of all, I'm a total perl newbie. I've been programming in VB for a
couple years, but I'm "gradutating" into perl. May god have mercy on us all.
My question is more conceptual:
I have two comma delimited text files, that are essentially database tables.
One is materials, one is orders.
Th
