Re: printing sentences on the same line

2008-01-07 Thread Gunnar Hjalmarsson
Chas. Owens wrote: On Jan 6, 2008 7:48 PM, Ryan <[EMAIL PROTECTED]> wrote: I have a small piece of a program which loops through lines of data, using the construct, one line at a time, and prints different pre-defined sentences, contingent upon what is found in each line of data. The data are

Re: Odd DBM::Deep behavior "cannot store tied value" using literal key name

2008-01-07 Thread Roman Daszczyszak
On Jan 4, 2008 5:45 PM, Chas. Owens <[EMAIL PROTECTED]> wrote: > When I downgrade to 0.983 I immediately get "DBM::Deep: File type > mismatch" even with your original code. I would suggest upgrading > DBM::Deep to version 1.0006. > Unfortunately, the Activestate Windows build for 5.8 DBM::Deep 1.

Re: Odd DBM::Deep behavior "cannot store tied value" using literal key name

2008-01-07 Thread Chas. Owens
On Jan 7, 2008 6:22 AM, Roman Daszczyszak <[EMAIL PROTECTED]> wrote: > On Jan 4, 2008 5:45 PM, Chas. Owens <[EMAIL PROTECTED]> wrote: > > > When I downgrade to 0.983 I immediately get "DBM::Deep: File type > > mismatch" even with your original code. I would suggest upgrading > > DBM::Deep to vers

insert and query a db

2008-01-07 Thread bbrecht56
Hi I'm trying to write a script that reads the data below, parses it, and then inserts it into the "info" table. 1:Karl Heiz:1:444-555-:441-551-6661:5:1:1:1 2:Helmut Schmidt:1:222-333-1234:222-555-4321:2:1:1:1 3:Udo Lindenberg:3:111-555-1234:111-556-4321:3:0:0:1 4:Peter Frech:2:333-111-1234:33

Need help with multi-line regex with DOS line terminations

2008-01-07 Thread Zembower, Kevin
I'm trying to process a DOS text file (with DOS CRLF line terminations) and translate from one database export format into another database input format. I've pasted in my program and a short example file of data at the end of this message. If the program is named 'medline2popline.pl' and the data

RE: insert and query a db

2008-01-07 Thread Moon, John
[>>] ... Please try (not tested). Placeholders help me a lot: my $sth_insert = $dbh->prepare('Insert into info (id, name, grade, phone, cell, house, car) values (?,?,?,?,?,?,?)') or die DBI->errstr; while (){ #---# #

What is happening with this filehandle?

2008-01-07 Thread garhone
Hi, I'm looking at someone else's code. It goes like this: my $condfile="myfile.txt"; open(COND, "|compile.pr > $condfile") or die "Can't fork: $!"; What is happening with this filehandle, particularly, what does the "|" (pipe) facilitate in this case? Thanks in advance, C -- To unsubscribe,

Re: What is happening with this filehandle?

2008-01-07 Thread Tom Phoenix
On Jan 7, 2008 2:07 PM, garhone <[EMAIL PROTECTED]> wrote: > open(COND, "|compile.pr > $condfile") or die "Can't fork: $!"; > > What is happening with this filehandle, particularly, what does the > "|" (pipe) facilitate in this case? It's a pipe-open: http://perldoc.perl.org/perlopentut.html

reading and writing file names

2008-01-07 Thread Dale Mosby
I am trying to think of a good way to write to a file a path/filename along with some additional data, and then read it back later. While this is strictly Linux now, I would like the code to work across platforms if possible. I realize that I will have to deal with translation of the path delimite

Re: reading and writing file names

2008-01-07 Thread Tom Phoenix
On Jan 7, 2008 5:17 PM, Dale Mosby <[EMAIL PROTECTED]> wrote: > I am trying to think of a good way to write to a file > a path/filename along with some additional data, > and then read it back later. While this is strictly > Linux now, I would like the code to work across > platforms if possible.

Re: reading and writing file names

2008-01-07 Thread Chas. Owens
On Jan 7, 2008 8:17 PM, Dale Mosby <[EMAIL PROTECTED]> wrote: > I am trying to think of a good way to write to a file > a path/filename along with some additional data, > and then read it back later. While this is strictly > Linux now, I would like the code to work across > platforms if possible. >

find2perl

2008-01-07 Thread oryann9
In find2perl, prune is set to 1 for true as in DO NOT desend dirs? From the man page "-prune" Do not descend into the directory currently matched. Likewise for File::Find prune set to 1? $ find2perl /dirname -size +4092k -ls -prune thank you ___

Re: find2perl

2008-01-07 Thread Randal L. Schwartz
> "oryann9" == oryann9 <[EMAIL PROTECTED]> writes: oryann9> $ find2perl /dirname -size +4092k -ls -prune Since -prune is *after* the condition of -size, you're setting prune only for VERY VERY LARGE directories. Is that your intent? -- Randal L. Schwartz - Stonehenge Consulting Services,

Re: find2perl

2008-01-07 Thread oryann9
oryann9> $ find2perl /dirname -size +4092k -ls -prune Since -prune is *after* the condition of -size, you're setting prune only for VERY VERY LARGE directories. Is that your intent? -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 <[EMAIL PROTECTED]> http://www.st

Re: reading and writing file names - thanks

2008-01-07 Thread Dale Mosby
Tom - Thanks for the pointer to storable. Think that is what I need for this current operation. And Chas - Thanks for the pointer to csv. I knew of it, though never used it. I did not know it would escape the delimiter, but of course that makes perfect sense! I think there is some author that is a

Re: find2perl

2008-01-07 Thread Randal L. Schwartz
> "oryann9" == oryann9 <[EMAIL PROTECTED]> writes: oryann9> No, but good point. My intent was to determine when -prune was set on oryann9> the CLI what the De-parsed code told me, 1==true, 0==false because oryann9> when I run this code below prune = 0 is not working, its descending oryann9> d