Re: Why Proc Grovelling vice Cook BookingRe: PID question

2002-05-10 Thread Felix Geerinckx
on Wed, 08 May 2002 22:57:18 GMT, [EMAIL PROTECTED] (Drieux) wrote: > I will confess I was happy to see that the CookBook version > used my pet approach of > > open(FH, "$cmd |") or die > > rather than all of this evil FORK child But you do realize that Perl is forking anyway, except

Re: win32 specification and API

2002-05-10 Thread Felix Geerinckx
on Fri, 10 May 2002 00:57:29 GMT, [EMAIL PROTECTED] (Drieux) wrote: > Assume that I wish to continue to work with linux running on > standard intel based cpu architecture, using consumer grade > mother boards, et al - will I need to extend into dealing with > the win32 API in perl much further th

Looping through elements of an anonymous array

2002-05-10 Thread eric-perl
Hello, All: I have an unusual question: If I have an anonymous array stored in a hash, is there a more graceful way of iterating through each item in the anonymous array than using a counter? i.e., @all_records{q} = [1, 2, 3] $j = 0; while ($all_records{q}->[$j]) { print $all_records{$

Parallel Fork Manager recommendations?

2002-05-10 Thread Zachary Buckholz
I have been using Parallel::ForkManager for a while and it has worked great for me I just used it again in another program and it's working ok. But I was curious to see if anyone had any recommendations for other alternatives? The current program I am considering using it in is a rewrite of a sea

Re: Looping through elements of an anonymous array

2002-05-10 Thread Felix Geerinckx
on Thu, 09 May 2002 17:18:26 GMT, [EMAIL PROTECTED] wrote: > I have an unusual question: If I have an anonymous array stored in > a hash, is there a more graceful way of iterating through each > item in the anonymous array than using a counter? i.e., > > @all_records{q} = [1, 2, 3] Note that th

Re: Sorry for the misunderstanding

2002-05-10 Thread Felix Geerinckx
on Wed, 08 May 2002 20:38:14 GMT, [EMAIL PROTECTED] (Richard Mr Usarec Buskirk) wrote: > I fixed my problem: > [...] > I have no errors and it works. I am glad you got it working. > I am new to cgi but i catch on quickly. Even though i didnt get a > response to help me. > I was hoping you guy

Re: Looping through elements of an anonymous array

2002-05-10 Thread Jenda Krynicky
From: [EMAIL PROTECTED] > I have an unusual question: If I have an anonymous array stored in a > hash, is there a more graceful way of iterating through each item in > the anonymous array than using a counter? i.e., > > @all_records{q} = [1, 2, 3] This should be $all_r

Re: win32 specification and API

2002-05-10 Thread Jenda Krynicky
Subject: win32 specification and API > I seem to be unclear from such documentation as I have > where exactly does the win32 space begin and end? My > premise had been that this was a 'windowing system' on > the order of M.I.T's Xwindows, Apple's GUI 'classic' and 'Aqua', > and who can forget G.E.

INI file

2002-05-10 Thread Arran
How would i read and write to an ini file? From: Arran song: "If you are sexy and you know it clap your hands" Me: im going to go have to sit this one out... If builders built buildings the way programmers wrote programs, then the first woodpecker to come along would destroy civilization. We

MD5

2002-05-10 Thread Arran
Is it possilble to MD5 multi lines so the output code is only 1 line? Should it do this any way? WHat would the code look like: thnxs in adv :) From: Arran song: "If you are sexy and you know it clap your hands" Me: im going to go have to sit this one out... If builders built buildings the

RE: what uid owns process 0?

2002-05-10 Thread Anders Holm
Hi Drieux, you forgot to mention the platform... Linux: no PID 0 HP-UX: Don't have one handy, but remember seeing PID0 being "swapper", whatever that is.. ;) Solaris: See Linux. Best Regards Anders Holm Critical Path Technical Support Engineer -

telnet?

2002-05-10 Thread Perl Hunter
Hi; Is there any sample code or way of "opening a telnet session with other username&password and then execute some commands like 'ls, ps, etc.' "? Thanks. Best regards. __ Do You Yahoo!? Yahoo! Shopping - Mother's Day is May 12th! http://shopping.

Re: apache::session

2002-05-10 Thread Matt C.
You may want to check out the following link: The article deals with HTML::Mason, but gives a good overview of Apache::Session as well. http://www.masonhq.com/user/adpacifico/ApacheSessionMason.html Matt --- Matthew Harrison <[EMAIL PROTECTED]> wrote: > I have had a look at the apache::session

Re: telnet?

2002-05-10 Thread Felix Geerinckx
on Fri, 10 May 2002 11:58:14 GMT, [EMAIL PROTECTED] (Perl Hunter) wrote: > Is there any sample code or way of "opening a telnet > session with other username&password and then execute > some commands like 'ls, ps, etc.' "? use Net::Telnet; See

Re: INI file

2002-05-10 Thread Jenda Krynicky
From: "Arran" <[EMAIL PROTECTED]> > How would i read and write to an ini file? There are many modules for this. Config::Ini, Config::IniFile, Win32::FileOp, Win32::IniHash, Win32::AdminMisc, ... You'd find them if you tried http://search.cpan.org Jenda P.S.: Please separate your signatur

System function not working

2002-05-10 Thread Kakade, Amod A
Hi I have 2 machines one running Windows2000 advanced server & other running the Windows 2000 Professional. If I run a perl program on Windows 2000 Professional machine it runs successfully but same code does not work at return a code 65280 What can be the reason behind this ? Regards

Re: System function not working

2002-05-10 Thread Felix Geerinckx
on Fri, 10 May 2002 12:11:00 GMT, [EMAIL PROTECTED] (Amod A Kakade) wrote: > I have 2 machines one running Windows2000 advanced server & other > running the Windows 2000 Professional. > > If I run a perl program on Windows 2000 Professional machine it > runs successfully but same code does no

Re: MD5

2002-05-10 Thread Felix Geerinckx
on Fri, 10 May 2002 11:33:49 GMT, [EMAIL PROTECTED] (Arran) wrote: > Is it possilble to MD5 multi lines so the output code is only 1 > line? The output of the Digest::MD5 Perl module is not in lines, it's a 128- bit fingerprint, which can be rendered as binary, hex or base64. > WHat would the

How to a parse a string in perl

2002-05-10 Thread FLAHERTY, JIM-CONT
I want to slice up this variable into a single variable and loop until its empty The variable is seperated via ! explnation points and I want the numbers. This string can be various in length ? Note it doesnt end with that delimiter. Help example $jims = "!23!45!67

Re: How to a parse a string in perl

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, FLAHERTY, JIM-CONT said: >This string can be various in length ? Note it doesnt end with that >delimiter. Help > > $jims = "!23!45!67 You could use split(), but you'd have to get rid of the first (empty) element. Instead, I would suggest the following regex: while ($string =~ /!

RE: How to a parse a string in perl

2002-05-10 Thread David Gray
> I want to slice up this variable into a single variable and > loop until its empty The variable is seperated via ! > explnation points and I want the numbers. This string can be > various in length ? Note it doesnt end with that delimiter. Help > > example > > $jims = "!23!45!67 Ho

Re: win32 specification and API

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 04:45 , Jenda Krynicky wrote: > No. Win32 means it's meant for 32 bit Microsoft Windows systems > : Win95, Win98, WinME, WinNT, Win2k, WinXP, ... > > While there might be some modules whose name starts with > Win32 that work on other OSes, it's very unlikely. And not

Re: Why Proc Grovelling vice Cook BookingRe: PID question

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 12:46 , Felix Geerinckx wrote: > on Wed, 08 May 2002 22:57:18 GMT, [EMAIL PROTECTED] (Drieux) wrote: > >> I will confess I was happy to see that the CookBook version >> used my pet approach of >> >> open(FH, "$cmd |") or die >> >> rather than all of this evil FOR

Re: MD5

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 04:33 , Arran wrote: > Is it possilble to MD5 multi lines so the output code is only 1 line? > > Should it do this any way? [..] you may wish to actually read preldoc Digest::MD5 you would be amazed at the illustrations in the documentation. ciao drieu

Re: Parallel Fork Manager recommendations?

2002-05-10 Thread Randal L. Schwartz
> "Zachary" == Zachary Buckholz <[EMAIL PROTECTED]> writes: Zachary> I have been using Parallel::ForkManager for a while and it has worked great Zachary> for me I just used it again in another program and it's working ok. But I Zachary> was curious to see if anyone had any recommendations for

Matching a range

2002-05-10 Thread Dave Chappell
I read a file line by line, on each line if any numbers in the range specified below exist between comas, Example: Line 1> hello,world,123,, Line 2> The grass,456, is,greener, Line 3> On,533,the,other, side Line 4> As, long, as the,1,grass is watered Line 5> Bye,world,680,, print the line

Really Dumb Perl Question

2002-05-10 Thread drieux
volks, I broke down and bought a copy of Perl 5 Pocket Reference, Third Edition c. 2000 ISBN: 0-596-00032-4 am I just getting Old, Or do you Mutants really keep all of that in your heads? ciao drieux --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

Re: Really Dumb Perl Question

2002-05-10 Thread Stephen Potter
That's why they print these books, so we don't have to keep all that in our heads. Trust me, some of us have big enough heads as is. -spp -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Really Dumb Perl Question

2002-05-10 Thread Nikola Janceski
tie %ANSWER "/dev/brain"; print %ANSWER{$question}, "\n"; ^D Most of it. > -Original Message- > From: drieux [mailto:[EMAIL PROTECTED]] > Sent: Friday, May 10, 2002 11:05 AM > To: [EMAIL PROTECTED] > Subject: Really Dumb Perl Question > > > > volks, > > I broke down and bought a copy

RE: win32 specification and API

2002-05-10 Thread Timothy Johnson
"will I need to extend into dealing with the win32 API in perl much further than to know that it exists on non-linux OS machine???" Not really, for the most part. Starting with the first part, though, the Win32 API is more than just a GUI implementation on an OS base. It's everywhere, lurk

RE: win32 specification and API

2002-05-10 Thread Timothy Johnson
Windows XP (which is currently the only Win64 OS if you buy that version, I believe) was made to be fully backwards compatible with Win32 specifications. Only time will tell if this is true. This SHOULD allow for people to use the Win32 namespace for a while before switching up to a Win64, or

RE: Matching a range

2002-05-10 Thread Timothy Johnson
I don't think you can "or" in the middle of a character class. I think that if you wanted to use that approach, you should have a separate character class for each "or". -Original Message- From: Dave Chappell To: [EMAIL PROTECTED] Sent: 5/10/02 7:55 AM Subject: Matching a range I read

RE: System function not working

2002-05-10 Thread Timothy Johnson
Check the $^E variable. It should have OS-specific error information. -Original Message- From: Kakade, Amod A To: '[EMAIL PROTECTED]' Sent: 5/10/02 5:11 AM Subject: System function not working Hi I have 2 machines one running Windows2000 advanced server & other running the Windows 2

Re: Matching a range

2002-05-10 Thread Tanton Gibbs
Unfortunately, the range operator doesn't work in a regex...though it would be nice if it did (of course I could be wrong)... I would try something like: while( ) { while( /,\d+,/g ) { if( in_range( $1 ) ) { # do whatever last; #get out of the while loop } } } The fi

Re: Matching a range

2002-05-10 Thread Tanton Gibbs
oops...forgot parens around the \d+... - Original Message - From: "Tanton Gibbs" <[EMAIL PROTECTED]> To: "Dave Chappell" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> Sent: Friday, May 10, 2002 11:22 AM Subject: Re: Matching a range > Unfortunately, the range operator doesn't work in a regex.

Re: win32 specification and API

2002-05-10 Thread Jenda Krynicky
From: drieux <[EMAIL PROTECTED]> > On Friday, May 10, 2002, at 04:45 , Jenda Krynicky wrote: > > > No. Win32 means it's meant for 32 bit Microsoft Windows systems : > > Win95, Win98, WinME, WinNT, Win2k, WinXP, ... > > > > While there might be some modules whose name starts with

Re: Matching a range

2002-05-10 Thread Dave K
Dave, One possiblity: use strict; open(IN, "lfile.txt"); # ho;d the line from the example in the orig post my $p1 = join('|', (512..520)); my $p2 = join('|', (528..568)); my $p3 = join('|', (576..578)); my $p4 = join('|', (592..600)); my $p5 = join('|', (608..622)); my $p6 = join('|', (624..6

Re: Matching a range

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Dave Chappell said: >I read a file line by line, on each line if any numbers in the range >specified below exist between comas, > >Example: >Line 1> hello,world,123,, >Line 2> The grass,456, is,greener, >Line 3> On,533,the,other, side >Line 4> As, long, as the,1,grass is watered

Re: Matching a range

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Dave K said: >my $p1 = join('|', (512..520)); >my $p2 = join('|', (528..568)); >my $p3 = join('|', (576..578)); >my $p4 = join('|', (592..600)); >my $p5 = join('|', (608..622)); >my $p6 = join('|', (624..670)); >my $p7 = join('|', (672..685)); >my $p8 = join('|', (768..771)); Why not

matching two files

2002-05-10 Thread Tucker, Ernie
Here is my first problem to the list. I have two different files with information that I need to find out what both have. ex. mac1.txt 0004.1112.3456 0003.45da.124d mac2.txt 0004.1112.3456 0003.45da.124e need the output to show only the duplicates 0004.1112.3456 Thanks; Ernest P. Tucker II

Re: matching two files

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Tucker, Ernie said: >Here is my first problem to the list. I have two different files with >information that I need to find out what both have. This is answered in the Perl FAQ: japhy% perldoc -q intersection Found in /usr/local/lib/perl5/5.00502/pod/perlfaq4.pod "How do I com

Re: Matching a range

2002-05-10 Thread Dave K
No I don't see why I need (). (but I do see an opportunity to learn something...). The kludge I posted does work (with the sample data in the original post). Why would () be required? If I understood the post correctly the task did not require capturing any numbers. TIA "Jeff 'Japhy' Pinyan" <[EM

RE: matching two files

2002-05-10 Thread Bob Showalter
> -Original Message- > From: Tucker, Ernie [mailto:[EMAIL PROTECTED]] > Sent: Friday, May 10, 2002 11:51 AM > To: '[EMAIL PROTECTED]' > Subject: matching two files > > > > Here is my first problem to the list. I have two different files with > information that I need to find out what bo

Re: [OT] La razon porque no me oyes con boca abierto.

2002-05-10 Thread Chas Owens
On Thu, 2002-05-09 at 20:36, Timothy Johnson wrote: > > "Hablar es el arte de sofocar e interrumpir el pensamiento" > > This explains A LOT. > This is also why I don't think that we will be using voice controlled computers in the future. -- Today is Setting Orange the 57th day of Discord in

Re: Matching a range

2002-05-10 Thread Felix Geerinckx
on Fri, 10 May 2002 14:55:08 GMT, [EMAIL PROTECTED] (Dave Chappell) wrote: > (/,[512..520|528..568|576..578|592..600|608..622|624..670|672..685| > 768..771] ,/){ The range operator doesn't work as you want in a regex character class, and neither does the '|'. I would do it like this: #! perl

Re: Matching a range

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Dave K said: >"Jeff 'Japhy' Pinyan" <[EMAIL PROTECTED]> wrote in message >[EMAIL PROTECTED]">news:[EMAIL PROTECTED]... >> On May 10, Dave K said: >> >> >while () { >> > if ( m/,$p1|$p2|$p3|$p4|$p5|$p6|$p7|$p8,/ ) { >> >> You need ()'s around the $p1|$p2|... part. The regex >> >> /,a

RE: matching two files

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Bob Showalter said: >perl -e 'do {$x{<>}=1} until eof; exists $x{$_} && print && delete $x{$_} >while(<>)' mac1.txt mac2.txt perl -e 'do{$x{<>}=1}until eof;delete$x{$_}&&print while<>' X Y -- Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/ RPI Acacia bro

Re: Global variables in forked processes

2002-05-10 Thread Chas Owens
On Fri, 2002-05-10 at 00:12, Ahmed Moustafa wrote: > Thanks a lot. I understand that. > > I was thinking that variable 'x' of a forked process 'p2' would point at > the same memory location of variable 'x' of a parent process 'p1'. That > can't be true. If that was true, 'p1' and 'p2' would be

Re: Really Dumb Perl Question

2002-05-10 Thread Chas Owens
On Fri, 2002-05-10 at 11:04, drieux wrote: > > volks, > > I broke down and bought a copy of > > Perl 5 Pocket Reference, Third Edition > c. 2000 > ISBN: 0-596-00032-4 > > am I just getting Old, > > Or do you Mutants really keep all of that in your heads? > > ciao > drieux >

RE: matching two files

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Jeff 'japhy' Pinyan said: >On May 10, Bob Showalter said: > >>perl -e 'do {$x{<>}=1} until eof; exists $x{$_} && print && delete $x{$_} >>while(<>)' mac1.txt mac2.txt > >perl -e 'do{$x{<>}=1}until eof;delete$x{$_}&&print while<>' X Y perl -e '$_.=<>until eof;s/^\Q$r\E$//m&&print whil

Re: Really Dumb Perl Question

2002-05-10 Thread bob ackerman
On Friday, May 10, 2002, at 08:09 AM, Nikola Janceski wrote: > tie %ANSWER "/dev/brain"; > print %ANSWER{$question}, "\n"; > ^D > Most of it. shouldn't that be: print $ANSWER{$question},"\n"; >> -Original Message- >> From: drieux [mailto:[EMAIL PROTECTED]] >> Sent: Friday, May 10, 20

RE: [OT] La razon porque no me oyes con boca abierto.

2002-05-10 Thread Timothy Johnson
Yeah, if you think that people have trouble reading the manual now, try having them follow directions while talking to the computer! -Original Message- From: Chas Owens [mailto:[EMAIL PROTECTED]] Sent: Friday, May 10, 2002 9:14 AM To: Timothy Johnson Cc: '[EMAIL PROTECTED]' Subject: Re:

Re: Really Dumb Perl Question

2002-05-10 Thread Chas Owens
On Fri, 2002-05-10 at 12:35, bob ackerman wrote: > > On Friday, May 10, 2002, at 08:09 AM, Nikola Janceski wrote: > > > tie %ANSWER "/dev/brain"; > > print %ANSWER{$question}, "\n"; > > ^D > > Most of it. > > shouldn't that be: > print $ANSWER{$question},"\n"; > > Nah, it was Perl 6 . In Pe

Re: How to a parse a string in perl

2002-05-10 Thread Eric Wang
Can you explain what all that means? specifically the /!([^!]*)/g part and the $1 part I only had limited automaton experience thanks for your time Eric > You could use split(), but you'd have to get rid of the first > (empty) element. Instead, I would suggest the following regex: > > while

Re: win32 specification and API

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 08:32 , Jenda Krynicky wrote: [..] >> >> thanks, that had been my working assumption - but it's >> this problem of sorting out which parts of what goes >> into a 'windows system' deal with the GUI, the standard >> construct of a kernel - as would be used in other OS's

meandering towards Topic - Re: [OT] La razon porque no me oyes con boca abierto.

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 09:39 , Timothy Johnson wrote: [..] > Yeah, if you think that people have trouble reading the manual now, try > having them follow directions while talking to the computer! [..] Watching some of the code samples come through, has anyone noticed the habit of using 'ame

Re: meandering towards Topic

2002-05-10 Thread Beau
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 On Friday 10 May 2002 11:36 am, drieux wrote: > I still never did get why > > Call Gandolf > > was not considered an acceptable 'exception handler' - Well, for starters, I think it's spelled "Gandalf," at least if you're using the builtins...

Perl/Tk

2002-05-10 Thread Shishir K. Singh
Is there anything analogous to tixPanedWindow (as in TCL/Tix) in Perl/Tk?? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: matching two files

2002-05-10 Thread Tucker, Ernie
I want to thank everyone for their input :) Ernest P. Tucker II Network Technician -Original Message- From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED]] Sent: Friday, May 10, 2002 11:31 AM To: [EMAIL PROTECTED] Cc: Bob Showalter; 'Tucker, Ernie'; '[EMAIL PROTECTED]' Subject: R

Installing dbi module

2002-05-10 Thread jdamunds
I am having trouble installing the DBI module on to an hpux workstation. Can anyone tell me how to install it on HPUX? Any help would be greatly appriciated. James Amundson Systems Development Engineer Coretec Inc. (416)208-2163 (416)471-5854 Cell -- To unsubscribe, e-mail: [EMAIL PROTECTED

Text file manipulation

2002-05-10 Thread Hughes, Andrew
I have a pipe delimited text file that I use as a mailing list I have information in the following format: lastname|firstname|company|email|state|date I am using it as a mailing list. However, over the last half year, it has gotten pretty big, and has some duplicates in it. For reporting sake

Re: Text file manipulation

2002-05-10 Thread Tanton Gibbs
Probably something like this: open FILE, "input.txt" or die "Could not open input.txt: $!\n"; # open the input file containing the records open OUTFILE, ">output.txt" or die "Could not open output.txt: $!\n"; #output the output file for unique recs my %addys; # a hash to store the unique recs i

Re: Text file manipulation

2002-05-10 Thread Jonathan E. Paton
> I want this file: > > jones|Bob|Acme1|[EMAIL PROTECTED]|GA|2/25/2002 > jones|Bob|Acme1|[EMAIL PROTECTED]|GA|2/28/2002 > smith|Jan|Acme2|[EMAIL PROTECTED]|FL|3/1/2002 > johnson|Salley|Acmeshop|[EMAIL PROTECTED]|TN|4/5/2002 > > SMITH|JAN|ACME2|[EMAIL PROTECTED]|FL|5/2/2002 > > to change to this

RE: Text file manipulation

2002-05-10 Thread Ned Cunningham
Could you add a variable that is incremented for each record??? -Original Message- From: Tanton Gibbs [mailto:[EMAIL PROTECTED]] Sent: Friday, May 10, 2002 3:31 PM To: Hughes, Andrew; [EMAIL PROTECTED]

Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Hughes, Andrew said: >I am using it as a mailing list. However, over the last half year, it has >gotten pretty big, and has some duplicates in it. For reporting sake, I >would like to delete the duplicate records based on email addresses. If you >sign up three times, I only want to

Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Tanton Gibbs said: >while( ) { # loop through the file, store current rec in $_ > my @record = split(/|/,$_); # record[0] = lastname You need to split on /\|/, not /|/. -- Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/ RPI Acacia brother #734 http:/

Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Jeff 'japhy' Pinyan said: >On May 10, Hughes, Andrew said: > >>I am using it as a mailing list. However, over the last half year, it has >>gotten pretty big, and has some duplicates in it. For reporting sake, I >>would like to delete the duplicate records based on email addresses. I

Re: Perl/Tk

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 11:54 , Shishir K. Singh wrote: > Is there anything analogous to tixPanedWindow (as in TCL/Tix) in Perl/Tk? > ? > I've found a few references: http://mini.net/tcl/tix which suggest that the Perl/Tk provides the basic type of support - cf the March 17th,2002 releas

Re: Text file manipulation

2002-05-10 Thread Tanton Gibbs
Good point... I ran some tests and it looks like /|/ matches just about anything...what does /|/ mean? - Original Message - From: "Jeff 'japhy' Pinyan" <[EMAIL PROTECTED]> To: "Tanton Gibbs" <[EMAIL PROTECTED]> Cc: "Hughes, Andrew" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> Sent: Friday, Ma

Re: Text file manipulation

2002-05-10 Thread Jonathan E. Paton
> I ran some tests and it looks like /|/ matches just about anything...what > does /|/ mean? If it were a regex, hang on... maybe it is... it would mean: Match a zero length string OR a zero length string. | is the regex character for OR. Jonathan Paton ___

Re: Text file manipulation

2002-05-10 Thread Tanton Gibbs
Oh yeah makes perfect sense now...match nothing or nothing and sense everything has nothing it always matches. haha...I like that. Tanton - Original Message - From: "Jonathan E. Paton" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Friday, May 10, 2002 3:41 PM Subject: Re: Text file ma

RE: Perl/Tk

2002-05-10 Thread Shishir K. Singh
Thanks...but it seems that tixPanedWindow has not been incorporated as Tix widget in Perl/Tk. -Original Message- From: drieux [mailto:[EMAIL PROTECTED]] Sent: Friday, May 10, 2002 3:37 PM To: [EMAIL PROTECTED] Subject: Re: Perl/Tk On Friday, May 10, 2002, at 11:54 , Shishir K. Singh

Re: Text file manipulation

2002-05-10 Thread Jonathan E. Paton
> >>I am using it as a mailing list. However, over the last half year, it has > >>gotten pretty big, and has some duplicates in it. For reporting sake, I > >>would like to delete the duplicate records based on email addresses. If you > >>sign up three times, I only want to keep your first recor

Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Jonathan E. Paton said: >> I meant to convert the email address to lowercase... > >Wonder where you got that idea? ;-) Oh, hush. ;) We all had the same answers, more or less. >Looks like that question has been quite well covered. Under Unix, my simple >version can be reduced to: >

Re: Text file manipulation

2002-05-10 Thread Jonathan E. Paton
> > Looks like that question has been quite well covered. > > Under Unix, my simple version can be reduced to: > > > >cat list.current | perl -ne 'print if not $seen{split'|'}++' > list.new > > Not so. Had you fooled for a moment! > First, you've got quote problems. Doh! I'd prefer to change

perldoc use Mostly::Readable - Re: Text file manipulation

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 12:41 , Tanton Gibbs wrote: > Oh yeah makes perfect sense now...match nothing or nothing and sense > everything has nothing it always matches. haha...I like that. > > Tanton I guess the two HORRORS I would like to stomp on are a) using "|" as a delimiter

Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Jonathan E. Paton said: >Opps! NB: Also lost the lc() from this too :P Gah! ;) >perl -ne '!$seen{lc~~(split/\|/)[3]}++&&print' input > output s/~~/+/; -- Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/ RPI Acacia brother #734 http://www.perlmonks.

Re: perldoc use Mostly::Readable - Re: Text file manipulation

2002-05-10 Thread Jonathan E. Paton
> > Oh yeah makes perfect sense now...match nothing or nothing and sense > > everything has nothing it always matches. haha...I like that. > > > > Tanton > > I guess the two HORRORS I would like to stomp on are > > a) using "|" as a delimiter Everyone should be using the standard CSV nota

Re: How to a parse a string in perl

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 10:52 , Eric Wang wrote: > Can you explain what all that means? > specifically the /!([^!]*)/g part > and the $1 part > > I only had limited automaton experience > thanks for your time the scary part is that this is part of the Regular Expression Game, and less to do

Re: perldoc use Mostly::Readable - Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Jonathan E. Paton said: >and hence the magic of using single quotes doesn't work as you'd expect. >It does get you out of other trouble though: > >s'$%@|'replacement'; > >where you'd otherwise spend all day backslashing things. All single quotes do is stop INTERPOLATION. Interpolatio

Very Basic Question: Open Interact Installation

2002-05-10 Thread Brian K
Here is a question that I will likely be ashamed I asked, once I have a clue... I have a pl file that relies on some OpenInteract stuff. I got as far as finding the openinteract install files. When I first ran the MakeFile.pl make install routine for this it gave a bunch of errors suggesting th

Re: MD5

2002-05-10 Thread Zachary Buckholz
This is what I use to check if a website has changed. It makes an MD5 string. #!/usr/bin/perl use LWP::Simple; use Digest::MD5 md5_hex; for (@ARGV) { $url = $_; $content = get($url); $digest = md5_hex($content); print "$digest"; } exit(); "Arran" <[EMAIL PROTECTED]> wrote in message 056401

File Search - String Match - String Count

2002-05-10 Thread Gregory Matthews
Hello All: I am trying to accomplish the following and have been unable to find a good routine (or build one) which does an adequate job. 1. Paste a big text file into an html text box which contains email addresses scattered throughout. 2. Upon form submission, perl routine will put that te

[OT] Re: Text file manipulation

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 01:20 , Jeff 'japhy' Pinyan wrote: > On May 10, Jonathan E. Paton said: > >> Opps! NB: Also lost the lc() from this too :P > > Gah! ;) isn't there a requirement that you are not allowed to swear in Klingon on a public email list myJackBootedFascistHouseMate alw

Re: MD5

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Zachary Buckholz said: >#!/usr/bin/perl > >use LWP::Simple; >use Digest::MD5 md5_hex; > >for (@ARGV) { >$url = $_; >$content = get($url); >$digest = md5_hex($content); >print "$digest"; > >} > >exit(); No offense, but why so drawn out? Why do $url = $_, instead of for $url (@ARGV)

RE: MD5

2002-05-10 Thread Zacharyb
Thanks for the recommendations, I will use them. Zack -Original Message- From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED]] Sent: Friday, May 10, 2002 1:58 PM To: Zachary Buckholz Cc: [EMAIL PROTECTED] Subject: Re: MD5 On May 10, Zachary Buckholz said: >#!/usr/bin/perl > >use LWP::

Tk bind

2002-05-10 Thread Beau E. Cox
Hi - I'm having a problem with Tk bind. In my script, I want to do some processing at windows activation, so I coded: $MAIN = MainWindow->new (-title => 'Play .wav file'); $MAIN->bind ('' => sub {DoMainActivate ()}); ... and so on. The window works, but DoMainActi

Re: Very Basic Question: Open Interact Installation

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 01:15 , Brian K wrote: > Here is a question that I will likely be ashamed I asked, once I have a > clue... that's the way they all start out { the 'twack!' sound you hear is the folks going - "OH! that's what that skank document meant } [..] > I am so new

RE: Very Basic Question: Open Interact Installation

2002-05-10 Thread Timothy Johnson
Do you have a C compiler installed? -Original Message- From: Brian K [mailto:[EMAIL PROTECTED]] Sent: Friday, May 10, 2002 1:16 PM To: [EMAIL PROTECTED] Subject: Very Basic Question: Open Interact Installation Here is a question that I will likely be ashamed I asked, once I have a clue

Re: [OT] Re: Text file manipulation

2002-05-10 Thread Chas Owens
On Fri, 2002-05-10 at 16:54, drieux wrote: > > On Friday, May 10, 2002, at 01:20 , Jeff 'japhy' Pinyan wrote: > > > On May 10, Jonathan E. Paton said: > > > >> Opps! NB: Also lost the lc() from this too :P > > > > Gah! ;) > > isn't there a requirement that you are > not allowed to swear in Kli

Re: Very Basic Question: Open Interact Installation

2002-05-10 Thread Brian K
So I ran "Perl MakeFile.pl" in the directory where I expanded the SPOPS module. It said it was "Writing MakeFile for Bundle::SPOPS" And now there is a new file in the dir called "MakeFile" What do I have to do to get the module installed into my perl\lib folder? From what I can tell I need SPOP

Re: perldoc use Mostly::Readable - Re: Text file manipulation

2002-05-10 Thread Jonathan E. Paton
> >and hence the magic of using single quotes doesn't work as you'd expect. > >It does get you out of other trouble though: > > > >s'$%@|'replacement'; > > > >where you'd otherwise spend all day backslashing things. > > All single quotes do is stop INTERPOLATION. Interpolation is not the > issue

Re: perldoc use Mostly::Readable - Re: Text file manipulation

2002-05-10 Thread Jeff 'japhy' Pinyan
On May 10, Jonathan E. Paton said: >> >and hence the magic of using single quotes doesn't work as you'd expect. >> >It does get you out of other trouble though: >> > >> >s'$%@|'replacement'; >> > >> >where you'd otherwise spend all day backslashing things. >> >> All single quotes do is stop INTE

Re: perldoc use Mostly::Readable - Re: Text file manipulation

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 03:29 , Jeff 'japhy' Pinyan wrote: [..] > I'm not necessarily speaking to you -- I'm reminding anyone reading these > messages that at no point do single quotes stop a regex from being a > regex. > > [snip credentials] > >> I know what INTERPOLATION is, and the differ

Re: win32 specification and API

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 08:10 , Timothy Johnson wrote: [..] >Where the Win32 namespace such a GEEK - I hadn't even thought of this in terms of FOO::Win32 and Win32::* as seperable - from the rest of the angst. I guess my next question in this series - how to tell - if

Re: Global variables in forked processes

2002-05-10 Thread drieux
On Friday, May 10, 2002, at 09:20 , Chas Owens wrote: [..] > In many operating systems fork is implemented using copy-on-write. This > means that when you fork both processes refer to the same memory > locations until one of them tries to change the bytes stored there. At > that time the change

use Getopt::Std; and use strict;

2002-05-10 Thread Hans Holtan
Hi everyone, I have a problem using Getopt::Std. I depend on use strict for all my code, and when I use Getopt::Std all the variables it creates (to hold the command line option values) are flagged by strict because they have not been scoped. I get errors like this: Line 70: Global symbol "$o

How determine email message size?

2002-05-10 Thread Uriel Wittenberg
Could someone please advise how to determine the size in KB of an email message? I currently have: --- use Mail::Internet; my $item = Mail::Internet->new(STDIN) ; my $msgbodyref = $item->body(); my $msgKB = .06 * @{$msgbodyref} ; --- However,

Re: use Getopt::Std; and use strict;

2002-05-10 Thread Tanton Gibbs
Yes you can say our $opt_m; or use vars qw($opt_m); at the top of your program (depending on perl version). - Original Message - From: "Hans Holtan" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Friday, May 10, 2002 9:30 PM Subject: use Getopt::Std; and use strict; > Hi everyon

RE: win32 specification and API

2002-05-10 Thread Timothy Johnson
I don't know if there is a pure Perl solution without using the Win32 namespace. If you are on a standard Win32 Perl distribution, you should have the Win32 module, so some basic API calls are supported, like Win32::GetOSVersion() (see below). You could also use backticks and the ver command a

  1   2   >