From bill at fccj.org Wed Jun 2 14:58:59 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: [ANNOUNCE] Source Code Project Message-ID: <199906021956.PAA08731@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - [Announce] http://jacksonville.pm.org A Perl Source Code Repository Project. - The Jacksonville Perl Monger's OpSys/SysAdmin/CGI/General Scripting Project: Source Code Repository; a place where you 'might' be able to find a script generic enough to modify to your own ends... This months featured script: 'List Home Pages' - see http://jacksonville.pm.org/homepages.cgi And no, this isn't another attempt at documenting Perl, perl is well covered in the standard distribution - so I strongly suggest you read it before posting to this group or e-mailing me. Also, please NOTE, I am not a perl expert, just another soul searching for 'reasonably priced' solutions. Notice I didn't say free. If you want something for free, build it yourself and give it away. While requests for script writing are welcome, only scripts which serve a useful purpose will be considered and, as always, what I write will by default, belong to me, unless it is a work modified from someone else's efforts - in which case, they are welcome to whatever changes/enhancements the Jacksonville Perl Mongers may make. :] Also, there is mainly NO SUPPORT, except where indicated. Support is given to those whose efforts are going toward worth-while non-profit pursuits - like ShadowMac, the mod_perl project, the Apache project, perl itself, etc. If you are working on a development project for something like http://www.sourcexchange.com, or another commercial venture then I expect to be compensated as well. I have donated some scripts I have personally written and hope to have more available as time permits. Credit for others work is always given, so if you see something in the archive you may have written and I did not credit you for it, or if you would prefer I didn't include it, please e-mail me. Thank you for your time in reading this, -Sneex- :] ______________________________________________________________________ Bill Jones Data Security Specialist http://www.fccj.org/cgi/mail?dss Jacksonville Perl Mongers http://jacksonville.pm.org jax@jacksonville.pm.org Running LinuxPPC RedHat 5.0 (Hurricane) __ _ http://www.linuxppc.org / /(_)_ __ _ ___ __ http://www.apache.org / / | | '_ \| | | \ \/ / http://www.redhat.com / /__| | | | | |_| |> < http://www.perl.com \____/_|_| |_|\__,_/_/\_\ http://www.gimp.org The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 8 05:36:15 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: Weekly Perl Script Message-ID: <199906081035.GAA29743@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - There isn't going to be a weekly perl script this week. But not to worry :) You can get a 'fix' at - http://jacksonville.pm.org/source/ Enjoy! -Sneex- :] __________________________________________________________________ Bill Jones | FCCJ DSS | Life is a 'Do it yourself' thing... http://www.fccj.org/cgi/mail?dss Jacksonville Perl Mongers http://jacksonville.pm.org jax@jacksonville.pm.org 'Be not the first by whom the new are tried, nor yet the last to lay the old aside...' The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 8 06:18:53 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906081117.HAA00042@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - Is anyone on this list actually alive, or am I just talking to myself? -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map{defined $_ ? $_ : " "} $`, $&, $', $+), "\n";} The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From jproctor at oit.umass.edu Tue Jun 8 07:34:15 1999 From: jproctor at oit.umass.edu (j proctor) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <199906081117.HAA00042@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; j proctor wrote - > Is anyone on this list actually alive, or > am I just talking to myself? >From what I can tell, you're pretty much just talking to yourself. Heck, people didn't even respond when I asked them just to introduce themselves. I know Jax is a COBOL town, but it can't be *that* damaging to everyone's reputation to admit they also use Perl. Sneex, how many people are actually subscribed to this list? j The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From dstringf at fccjmail.fccj.cc.fl.us Tue Jun 8 10:10:34 1999 From: dstringf at fccjmail.fccj.cc.fl.us (dstringf@fccjmail.fccj.cc.fl.us) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <375d245a.5b4c.0@fccj.org> On the Jax.PM jacksonville-pm-list; dstringf@fccjmail.fccj.cc.fl.us wrote - >On the Jax.PM jacksonville-pm-list; >"Bill Jones" wrote - > > >Is anyone on this list actually alive, or >am I just talking to myself? Both. :) The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 8 10:16:55 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906081514.LAA02761@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > Sneex, how many people are actually subscribed to this list? > 8 (all hiding.) -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map{defined $_ ? $_ : " "} $`, $&, $', $+), "\n";} The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From jproctor at oit.umass.edu Tue Jun 8 10:38:14 1999 From: jproctor at oit.umass.edu (j proctor) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <199906081514.LAA02761@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; j proctor wrote - > > Sneex, how many people are actually subscribed to this list? > > 8 (all hiding.) Okay. That's about what we had in Hartford when we decided it was time for a meeting. Maybe the offer of food will draw the other 5 out of their shells. Pick a date and place and make everyone on the list responsible for the bill unless they RSVP (to the entire list) that they're *not* going to be there. If no one answers or shows, you'll have a nice supper at six someone elses' expense. :) I won't be there, unless it happens to be while I'm in Jax visiting family and friends and I don't already have other plans. What's a dstringf, anyway? We know *you're* paying attention. Hi. I'm j, the other guy is Bill (though there's a reasonable chance you know him, if you're at FCCJ). Introduce yourself. Make some list traffic. Some people don't get nearly enough useless noise junk mail in their mailboxes. I'm not actually one of them, but I'm trying to be helpful here. j The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 8 10:54:32 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906081552.LAA03341@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > What's a dstringf, anyway? We know *you're* paying attention. Hi. I'm > j, the other guy is Bill (though there's a reasonable chance you know him, > if you're at FCCJ). Introduce yourself. Make some list traffic. Some > people don't get nearly enough useless noise junk mail in their mailboxes. > I'm not actually one of them, but I'm trying to be helpful here. > [BTW: If you people simply want to reply to a posting, hit reply-all and edit the TO: line. NO, I haven't fixed that yet; not sure I can.] They won't respond. :) They're all vicious vampires that will suck the s/life/perl/i out of you unless you hide. So, they're all hiding, afraid of what the other vampires might do to them :) (Sorry, I watched 'Armageddon' last night) -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map{defined $_ ? $_ : " "} $`, $&, $', $+), "\n";} The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From dstringf at fccjmail.fccj.cc.fl.us Tue Jun 8 11:55:11 1999 From: dstringf at fccjmail.fccj.cc.fl.us (Daniel Stringfield) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <375d419c.10d5.13@fccj.org> Message-ID: On the Jax.PM jacksonville-pm-list; Daniel Stringfield wrote - On Tue, 8 Jun 1999, j proctor wrote: > What's a dstringf, anyway? We know *you're* paying attention. Hi. I'm > j, the other guy is Bill (though there's a reasonable chance you know him, > if you're at FCCJ). Introduce yourself. Make some list traffic. Some > people don't get nearly enough useless noise junk mail in their mailboxes. > I'm not actually one of them, but I'm trying to be helpful here. Yeah, I know him. :) I come in and share his office once and a while, steal candy from his desk, and take over his X terminal. My name is Daniel. I work for the same department as Bill. My official title is Systems Programmer. I started programming in Perl about 11 months ago. Loved it ever since. Bill made me join the Perl Mongers, because I keep asking him stupid perl questions. -- ======= 40 4B 36 58 A0 C7 5A 8A 49 E0 39 54 00 20 A3 AA ======= Daniel Stringfield Florida Community College at Jacksonville ================================================================ The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From LSF at exchange.fccj.org Tue Jun 8 11:50:08 1999 From: LSF at exchange.fccj.org (Freudenthal, Scott) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: On the Jax.PM jacksonville-pm-list; "Freudenthal, Scott" wrote - I'd have to concur with the dstringf on that. I'm here too. My name is Scott. I'd rather not buy dinner, but I'd enjoy eating it. Let's do try to get together, maybe a Thursday after work...? -----Original Message----- From: dstringf@fccjmail.fccj.cc.fl.us [mailto:dstringf@fccjmail.fccj.cc.fl.us] Sent: Tuesday, June 08, 1999 6:11 AM To: jacksonville-pm-list@happyfunball.pm.org Subject: Re: HELLO? [Was Re: Weekly Perl Script] On the Jax.PM jacksonville-pm-list; dstringf@fccjmail.fccj.cc.fl.us wrote - >On the Jax.PM jacksonville-pm-list; >"Bill Jones" wrote - > > >Is anyone on this list actually alive, or >am I just talking to myself? Both. :) The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From sml at zfx.com Tue Jun 8 12:13:19 1999 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] References: Message-ID: <375D4F2F.6113@zfx.com> On the Jax.PM jacksonville-pm-list; Steve Lane wrote - j proctor wrote: > Introduce yourself. Make some list traffic. Some > people don't get nearly enough useless noise junk mail in their mailboxes. > I'm not actually one of them, but I'm trying to be helpful here. ok. i'm Steve Lane, and live in east Tennessee. i belong to Knoxville.pm, and will shortly be creating a .pm group a little closer to where i live. i'm browsing/lurking on several .pm mailing lists to: - get an idea of what i want to do with my .pm group(s) - get an idea of what the Perl "culture" is like in various parts of the country, if i move to a larger city someday. i use Perl every day, and get paid a reasonable amount (for my area of the country) for it. i'm going to yapc in a couple of weeks, and am greatly looking forward to that. of course, if you folks don't want an "outsider" hanging around, just let me know... -- Steve Lane The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From jproctor at oit.umass.edu Tue Jun 8 12:33:44 1999 From: jproctor at oit.umass.edu (j proctor) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <375D4F2F.6113@zfx.com> Message-ID: On the Jax.PM jacksonville-pm-list; j proctor wrote - > - get an idea of what i want to do with my .pm group(s) > - get an idea of what the Perl "culture" is like in > various parts of the country, if i move to a larger > city someday. New York and Boston are both interesting to watch. It's amazing that they're so completely different, and there's actually several people that are regulars on both lists. > i'm going > to yapc in a couple of weeks, and am greatly looking > forward to that. Heh. That's the week I'm going to Jacksonville and Atlanta. > of course, if you folks don't want an "outsider" > hanging around, just let me know... Check my email address. Hint: UMass is closer to Canada than you are. But this is cool: at least a quarter of the "established" Perl culture in Jacksonville isn't anywhere near there. j The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 8 20:14:06 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906090111.VAA09611@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - >From: Steve Lane > of course, if you folks don't want an "outsider" > hanging around, just let me know... > -- > Steve Lane :] No, you're welcome here Steve. I don't see any reason why you 'have' to live around here. But it does make traveling to the meetings harder (if I ever get one going... :) -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map{defined $_ ? $_ : " "} $`, $&, $', $+), "\n";} The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 8 20:16:24 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906090113.VAA09634@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - >From: j proctor > Check my email address. Hint: UMass is closer to Canada than you are. > But this is cool: at least a quarter of the "established" Perl culture in > Jacksonville isn't anywhere near there. > Oh well :] Jacksonville is a big city, all spread out. No reason not to extend our reach further into other states ;) -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map{defined $_ ? $_ : " "} $`, $&, $', $+), "\n";} The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From dstringf at fccjmail.fccj.cc.fl.us Tue Jun 8 23:22:36 1999 From: dstringf at fccjmail.fccj.cc.fl.us (Daniel Stringfield) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <199906090111.VAA09611@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; Daniel Stringfield wrote - On Tue, 8 Jun 1999, Bill Jones wrote: > No, you're welcome here Steve. > I don't see any reason why you 'have' to live around > here. But it does make traveling to the meetings harder > (if I ever get one going... :) The least likely people to show up are the ones that live here anyway. :) -- ======= 40 4B 36 58 A0 C7 5A 8A 49 E0 39 54 00 20 A3 AA ======= Daniel Stringfield Florida Community College at Jacksonville ================================================================ The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Wed Jun 9 05:46:31 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906091044.GAA11707@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - Now you guys know why I haven't planned a meeting yet... -Sneex- :( _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss ---------- > On the Jax.PM jacksonville-pm-list; > Daniel Stringfield wrote - > > > On Tue, 8 Jun 1999, Bill Jones wrote: > >> No, you're welcome here Steve. >> I don't see any reason why you 'have' to live around >> here. But it does make traveling to the meetings harder >> (if I ever get one going... :) > > The least likely people to show up are the ones that live here anyway. :) > The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From jproctor at oit.umass.edu Wed Jun 9 07:34:59 1999 From: jproctor at oit.umass.edu (j proctor) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <199906090113.VAA09634@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; j proctor wrote - > Jacksonville is a big city, all spread out. No reason not > to extend our reach further into other states ;) Well, it's already known as the largest city in south Georgia. :) A friend of mine once asserted that the community of Switzerland, in St. Johns country just south of Mandarin & Fruit Cove, was proof that Jacksonville would annex anything in its quest for global domination. I figure I'm safe for a while. The prominent political figure in western Mass is "Mayor Mike" Albano of Springfield, and he won't do *anything* that will undermine his authority. It wouldn't be quite so creepy if he didn't look and sound like Mayor Quimby (also Springfield) on the Simpsons. Besides, he and John Delaney would probably both explode if they got within 10 feet of each other (something about matter and anti- matter). Then again, some people would say that's not necessarily a bad thing to happen to either of them. Hrm. j The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From jproctor at oit.umass.edu Wed Jun 9 07:48:11 1999 From: jproctor at oit.umass.edu (j proctor) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] In-Reply-To: <199906091044.GAA11707@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; j proctor wrote - >> The least likely people to show up are the ones that live here anyway. :) > Now you guys know why I haven't planned a meeting yet... So we're back to my original suggestion: those that *don't* show have to pay for those that do. It does bring up the question of whether Steve and I should be exempt since we're not within, say, 400 miles or so, but I think we could reach a reasonable consensus on that. :) j The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Wed Jun 9 08:39:42 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: HELLO? [Was Re: Weekly Perl Script] Message-ID: <199906091337.JAA13158@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > On the Jax.PM jacksonville-pm-list; > j proctor wrote - > >> Jacksonville is a big city, all spread out. No reason not >> to extend our reach further into other states ;) > > I figure I'm safe for a while. The prominent political figure in western > Mass is "Mayor Mike" Albano of Springfield, and he won't do *anything* > that will undermine his authority. It wouldn't be quite so creepy if he > didn't look and sound like Mayor Quimby (also Springfield) on the > Simpsons. Besides, he and John Delaney would probably both explode if > they got within 10 feet of each other (something about matter and anti- > matter). Then again, some people would say that's not necessarily a bad > thing to happen to either of them. Hrm. ROTFLOL :] -Sneex- :] The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Thu Jun 10 08:57:03 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: Debugging Practice Message-ID: <199906101354.JAA25324@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - Hi all :] Sorry I didn't post a Script of the Week this past weekend, but I've been extremely busy at work... At any rate, here is a practice script for you 'less-than-expert' perl'ers to debug: #Reducing the problem to smallest test code: $vFlag = "a|0|0|y|0|0|x|x|z"; print " Well? ", { ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' }, "\n"; Please post your answers, etc, to - jacksonville-pm-list@hfb.pm.org Also, please elaborate upon which paths and resources you followed to determine the correct answer... Enjoy! -Sneex- :] _________________________________________________________________________ $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map { defined $_ ? $_ : "" } $`, $&, $', $+), "\n"; } The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From dhowk at netscape.net Thu Jun 10 13:52:03 1999 From: dhowk at netscape.net (Doug Howk) Date: Thu Aug 5 00:03:04 2004 Subject: debug script Message-ID: <19990610185203.20790.qmail@ww156.netaddress.usa.net> On the Jax.PM jacksonville-pm-list; Doug Howk wrote - Seventh element of anonymous array created by split is = 'x' (ie, true); therefore, output should be "Well, do this" ____________________________________________________________________ Get your own FREE, personal Netscape WebMail account today at http://webmail.netscape.com. The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Thu Jun 10 14:10:49 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: debug script Message-ID: <199906101908.PAA00004@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > On the Jax.PM jacksonville-pm-list; > Doug Howk wrote - > > > Seventh element of anonymous array created by split is = 'x' (ie, true); > therefore, output should be "Well, do this" :) Yes (I meant it as a kind of joke; but as a useful learning experience!) That is true, but what can I (you) do to fix it so it works correctly? After everyone has had a shot at it, this Saturday I will post the answer(s)... Enjoy! -Sneex- :] _________________________________________________________________________ $_ = "Jacksonville Perl Monger"; while(/([Jacksonville Perl Monger])/g){ print join(" ", map { defined $_ ? $_ : "" } $`, $&, $', $+), "\n"; } The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From sml at zfx.com Thu Jun 10 15:27:19 1999 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:03:04 2004 Subject: Debugging Practice References: <199906101354.JAA25324@astro.fccj.cc.fl.us> Message-ID: <37601FA7.1CFB@zfx.com> On the Jax.PM jacksonville-pm-list; Steve Lane wrote - Bill Jones wrote: > At any rate, here is a practice script for you > 'less-than-expert' perl'ers to debug: > > #Reducing the problem to smallest test code: > $vFlag = "a|0|0|y|0|0|x|x|z"; > > print > " Well? ", > { > ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' > }, > "\n"; i don't consider myself an 'expert', so i guess i can try :) ... print() takes a list of scalars. you're giving it three of them. the second is the thing that looks like a block, but is not a block; a braced expression in scalar context is an anonymous hash reference. the value of this when printed is the string "HASH" followed by the memory address the reference points to, giving the output: Well? HASH(0x8051118) one fix is to remove the braces completely; they're not needed. that's what i'd do. another one would be to add a "do" in front of the opening brace; this forms a do-block that is like a function that returns the value of the last executed statement. -- Steve Lane The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Thu Jun 10 20:13:01 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: Debugging Practice Message-ID: <199906110111.VAA03594@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > On the Jax.PM jacksonville-pm-list; > Steve Lane wrote - > > > Bill Jones wrote: >> At any rate, here is a practice script for you >> 'less-than-expert' perl'ers to debug: >> >> #Reducing the problem to smallest test code: >> $vFlag = "a|0|0|y|0|0|x|x|z"; >> >> print >> " Well? ", >> { >> ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' >> }, >> "\n"; > > i don't consider myself an 'expert', so i guess > i can try :) ... > Neither is me :) > print() takes a list of scalars. you're giving it > three of them. the second is the thing that looks > like a block, but is not a block; a braced expression > in scalar context is an anonymous hash reference. > the value of this when printed is the string "HASH" > followed by the memory address the reference points > to, giving the output: > > Well? HASH(0x8051118) > > one fix is to remove the braces completely; they're > not needed. that's what i'd do. > That's a one way; usually at first glance (some disagree, however...) > another one would be to add a "do" in front of the > opening brace; this forms a do-block that is like a > function that returns the value of the last executed > statement. Super; another way. Yes, do{} would work as well. OK, as I collect more ways to do this, we shall see who picked the way I picked (not that I am right or anything, this was just a simple exercise...) Saturday I'll post the accumulative answers for all to see and contemplate... Enjoy! -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_="Jacksonville Perl Mongers";while(/([Jacksonville Perl Mongers])/g){ print join(" ",map{defined $_ ? $_ : ""}$`,$&,$',$+),"\n";} The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Fri Jun 11 13:45:22 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:04 2004 Subject: New Jax PM Page Updates Message-ID: <199906111842.OAA09360@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - Go see: http://jacksonville.pm.org seek DATA,0,1;print; __DATA__ -Sneex- :] Just Another Perl Monger... _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_="JOIN THE JAX PERL MONGERS J zbjrnmuhkkd Pdqk Mnmfdqr J\n"; tr/za-y/a-z/; / ((.)) /; do { print substr($_,25); } while ( s/((.).{23}) $2 (.)(.*) (.)$/$1$5 $2 $4 $3/ ) The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Mon Jun 14 12:07:40 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: Debugging Practice Message-ID: <199906141705.NAA28983@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > On the Jax.PM jacksonville-pm-list; > "Bill Jones" wrote - > > > #Reducing the problem to smallest test code: > $vFlag = "a|0|0|y|0|0|x|x|z"; > > print > " Well? ", > { > ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' > }, > "\n"; > > > Please post your answers, etc, to - > > jacksonville-pm-list@hfb.pm.org > > Also, please elaborate upon which paths and resources > you followed to determine the correct answer... OK, sorry it took me so long to get back with the answer (IE, the answer I have.) If you do a perl -c code.pl it will say the syntax is correct... However, If you run the code, it gives an error like - # Odd number of elements in hash list. File 'Untitled'; Line 1 Well? HASH(0x97dad28) Many people responded to this request. And yes, there is more than on way to do it - (All of the following will work.) # Way 1 (eval: dangerous if used with user supplied data): print " Well? ", eval { ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' }, "\n"; # Way 2 (do): $vFlag = "a|0|0|y|0|0|x|x|z"; print " Well? ", do { ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' }, "\n"; # Way 3 (remove the damn Squiggly Brackets :) $vFlag = "a|0|0|y|0|0|x|x|z"; print " Well? ", ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that', "\n"; # Of Note: JProctor recognized I had ask you to # DEBUG as opposed to IMPROVE the code: # His responses were - $out = ((split('|', $vFlag))[7] eq 'x' ? 'yes' : 'no'; print "Well? $out \n"; or... @flags = split('|', $vFlag); for ($i = 0; $i < $#flags; $i++) { $out[$i] = $flags[$i] eq 'x' ? 'yes' : 'no'; } print "Well? $out[7] \n"; # He finally settled upon removing the {} (saying they # were vaguely hash-like. :) # Way 4 (using @{[]}; Interpolation) # The answer I settled upon (before even posting this query # to the group) was - $vFlag = "a|0|0|y|0|0|x|x|z"; print " Well? ", @{[ ((split(/\|/, $vFlag))[7] eq 'x') ? 'do this' : 'do that' ]}, "\n"; Interpolation by @{[]}; is powerful in that you gain the ability in 'eval'uation of complex code with out running the risks that using 'eval' by it's self would introduce to the script. The best way in this case would have to been to simply remove the HASH-like reference unintentionally introduced by using {} ... Where is @{[]} used in the real world? Well, inside 'HERE' Docs you cannot use a system call with either `` (backticks) or systems(), you have to basically do something like - print << __HERE_Doc; Your Unix ENVIRONMENT: @{[ die if ((system("set")) > 0) ]}; (For an example, see http://jacksonville.pm.org/source/sysadmin) __HERE_Doc Reference: Look up Perl FAQ 4 - Data Manipulation. I hope this has been beneficial to all :) I hope you all Enjoy Perl More! seek DATA,0,1;print; __DATA__ -Sneex- :] Just Another Perl Monger... _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_="JOIN THE JAX PERL MONGERS J zbjrnmuhkkd Pdqk Mnmfdqr J\n"; tr/za-y/a-z/; / ((.)) /; do { print substr($_,25); } while ( s/((.).{23}) $2 (.)(.*) (.)$/$1$5 $2 $4 $3/ ) The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From sml at zfx.com Mon Jun 14 12:06:42 1999 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:03:05 2004 Subject: Debugging Practice References: <199906141705.NAA28983@astro.fccj.cc.fl.us> Message-ID: <376536A2.446B@zfx.com> On the Jax.PM jacksonville-pm-list; Steve Lane wrote - Bill Jones wrote: > Where is @{[]} used in the real world? Well, inside 'HERE' Docs you cannot > use a system call with either `` (backticks) or systems(), you have to > basically do something like - > > print << __HERE_Doc; > Your Unix ENVIRONMENT: > @{[ die if ((system("set")) > 0) ]}; > > (For an example, see http://jacksonville.pm.org/source/sysadmin) > __HERE_Doc > > Reference: Look up Perl FAQ 4 - Data Manipulation. it's not just system calls that you can put in the @{[]} bizarrity, it's any perl code. i most often (by far) use it because i have a long here-doc that needs the result of a subroutine call, like $mail = < The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Tue Jun 15 15:59:45 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: SUBSCRIBE jacksonville-pm-list rebecca@primusnet.com Message-ID: <199906152057.QAA22421@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - Welcome to Jax PM Rebecca :] Everybody, sound off and say Hi! seek DATA,0,1;print; __DATA__ -Sneex- :] Just Another Perl Monger... _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_="JOIN THE JAX PERL MONGERS J zbjrnmuhkkd Pdqk Mnmfdqr J\n"; tr/za-y/a-z/; / ((.)) /; do { print substr($_,25); } while ( s/((.).{23}) $2 (.)(.*) (.)$/$1$5 $2 $4 $3/ ) The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From dstringf at fccjmail.fccj.cc.fl.us Tue Jun 15 23:21:38 1999 From: dstringf at fccjmail.fccj.cc.fl.us (Daniel Stringfield) Date: Thu Aug 5 00:03:05 2004 Subject: SUBSCRIBE jacksonville-pm-list rebecca@primusnet.com In-Reply-To: <199906152057.QAA22421@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; Daniel Stringfield wrote - On Tue, 15 Jun 1999, Bill Jones wrote: > Welcome to Jax PM Rebecca :] > > Everybody, sound off and say Hi! Hello Rebecca. (We up to 6? 7? now?) -- ======= 40 4B 36 58 A0 C7 5A 8A 49 E0 39 54 00 20 A3 AA ======= Daniel Stringfield Florida Community College at Jacksonville ================================================================ The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Wed Jun 16 06:36:08 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: SUBSCRIBE jacksonville-pm-list rebecca@primusnet.com Message-ID: <199906161134.HAA25792@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > On the Jax.PM jacksonville-pm-list; > Daniel Stringfield wrote - > > (We up to 6? 7? now?) No, Rebecca is the 9th member! Yippy! seek DATA,0,1;print; __DATA__ -Sneex- :] Just Another Perl Monger... _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 $_="JOIN THE JAX PERL MONGERS J zbjrnmuhkkd Pdqk Mnmfdqr J\n"; tr/za-y/a-z/; / ((.)) /; do { print substr($_,25); } while ( s/((.).{23}) $2 (.)(.*) (.)$/$1$5 $2 $4 $3/ ) The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From neomancer at linuxmail.org Wed Jun 16 06:20:31 1999 From: neomancer at linuxmail.org (Gene Cronk) Date: Thu Aug 5 00:03:05 2004 Subject: SUBSCRIBE jacksonville-pm-list rebecca@primusnet.com Message-ID: <19990616112031.10672.qmail@linuxmail.org> On the Jax.PM jacksonville-pm-list; "Gene Cronk" wrote - Welcome Rebecca...=^) WOOHOO...almost double digits....hehe -----Original Message----- From: Daniel Stringfield Date: Wed, 16 Jun 1999 00:21:38 -0400 (EDT) To: Subject: Re: SUBSCRIBE jacksonville-pm-list rebecca@primusnet.com > > > On the Jax.PM jacksonville-pm-list; > Daniel Stringfield wrote - > > > On Tue, 15 Jun 1999, Bill Jones wrote: > > > Welcome to Jax PM Rebecca :] > > > > Everybody, sound off and say Hi! > > Hello Rebecca. > > (We up to 6? 7? now?) > > -- > ======= 40 4B 36 58 A0 C7 5A 8A 49 E0 39 54 00 20 A3 AA ======= > Daniel Stringfield > Florida Community College at Jacksonville > ================================================================ > > > > The Jacksonville Perl Monger's Group is operated by - > Bill -Sneex- Jones ( sneex@usa.net ), > to whom send all praises, complaints, or comments... > > > __________________________ Get Your Private, Free Email at http://www.linuxmail.org Powered by OutBlaze The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From jproctor at oit.umass.edu Wed Jun 16 07:25:19 1999 From: jproctor at oit.umass.edu (j proctor) Date: Thu Aug 5 00:03:05 2004 Subject: SUBSCRIBE jacksonville-pm-list rebecca@primusnet.com In-Reply-To: <199906152057.QAA22421@astro.fccj.cc.fl.us> Message-ID: On the Jax.PM jacksonville-pm-list; j proctor wrote - > Welcome to Jax PM Rebecca :] > > Everybody, sound off and say Hi! No! You can't make me! I won't post a meaningless greeting to a complete stranger on this austere and very focused list! Why should everyone (all 9 of them) have to read my random blather this morning? Er, uh, wait. Nevermind. Hi, Rebecca. What's a primusnet? j The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Sun Jun 20 17:21:47 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: Weekly Perl Script Message-ID: <199906202219.SAA01294@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - [Fifth issue in a continuing series...] Hi All :] As a benefit for the Jacksonville Perl Monger membership (now at 9 :) I present the Fifth Issue in the "Weekly Perl Script" series. Each Week, around Saturday or Sunday, I will submit to the list a Perl Script which does something useful, but one which isn't too hard to follow along with and can be modified to attend other tasks. I will post a script to the Jax-PM listserv and allow one week for the group to discuss it; after the week has passed I will either post a follow-up, one which will help describe the functioning of the prior weeks post or we will move on to a new script to discuss that week. Fair enough? BTW: The 'other' members may post scripts and/or questions here as well. I'm not saying that any of them will be answered - but together I am sure we can discover a solution! Here is this weeks offering for your review - The following is considered C-ish. Can you rewrite it to make it Perl-ish? Please do not worry about -w nor use strict solutions. if ($wday < $beginWeek || $wday > $endWeek) { $invalid = 1; } elsif ($hour < $axsStartHr) { $invalid = 1; } elsif ($hour >= $axsStopHr) { $invalid = 1; } Look at it, think it over, and if you have any questions, please post to the list. Enjoy! -Sneex- :] _________________________________________________________________________ Bill Jones | Data Security Specialist | http://www.fccj.org/cgi/mail?dss FCCJ | 501 W State St | Jacksonville, FL 32202 | 1 (904) 632-3089 The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Sun Jun 20 17:25:09 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: Weekly Perl Script Message-ID: <199906202222.SAA01306@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - SURVEY: Are these scripts -- 1. Too hard? 2. Too easy? 3. Just right? Please contact me directly if you feel we should cover other types of topics. Thx, -Sneex- :] ______________________________________________________________________ Bill Jones Data Security Specialist http://www.fccj.org/cgi/mail?dss The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From sml at zfx.com Mon Jun 21 13:12:44 1999 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:03:05 2004 Subject: Weekly Perl Script References: <199906202219.SAA01294@astro.fccj.cc.fl.us> Message-ID: <376E809C.6488@zfx.com> On the Jax.PM jacksonville-pm-list; Steve Lane wrote - Bill Jones wrote: > The following is considered C-ish. Can you rewrite > it to make it Perl-ish? Please do not worry > about -w nor use strict solutions. > > if ($wday < $beginWeek || $wday > $endWeek) { > $invalid = 1; > } elsif ($hour < $axsStartHr) { > $invalid = 1; > } elsif ($hour >= $axsStopHr) { > $invalid = 1; > } $invalid = ($wday < $begin_week || $wday > $end_week) ? 1 : ($hour < $axs_start_hr) ? 1 : ($hour >= $axs_stop_hr) ? 1 : 0; you could of course combine the three conditions into a single $invalid = 1 if CONDITIONS; statement, but i prefer the cascading ternary because it keeps the different types of conditions separate. it also gives you an easy default value (the : 0 at the end). -- Steve Lane The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Mon Jun 21 16:04:52 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: Weekly Perl Script Message-ID: <199906212102.RAA12012@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - > On the Jax.PM jacksonville-pm-list; > Steve Lane wrote - >> if ($wday < $beginWeek || $wday > $endWeek) { >> $invalid = 1; >> } elsif ($hour < $axsStartHr) { >> $invalid = 1; >> } elsif ($hour >= $axsStopHr) { >> $invalid = 1; >> } > $invalid = > ($wday < $begin_week || $wday > $end_week) ? 1 > : ($hour < $axs_start_hr) ? 1 > : ($hour >= $axs_stop_hr) ? 1 > : 0; Yes :) print "Valid" unless ( (0 < 0 || 0 > 0) ? 1 : (0 < 0) ? 1 : (0 >= 1) ? 1 : 0 ) This concept really goes against the perl grain in that 0 = false, >0 = true... Anyone have any others? -Sneex- :] FCCJ Data Security Group ______________________________________________________________________ Bill Jones Data Security Specialist http://www.fccj.org/cgi/mail?dss The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments... From bill at fccj.org Thu Jun 24 21:50:55 1999 From: bill at fccj.org (Bill Jones) Date: Thu Aug 5 00:03:05 2004 Subject: Weekly Perl Script Message-ID: <199906250248.WAA17545@astro.fccj.cc.fl.us> On the Jax.PM jacksonville-pm-list; "Bill Jones" wrote - NOTE: This week's script is early because I may not be around this weekend... [Sixth issue in a continuing series...] Hi All :] As a benefit for the Jacksonville Perl Monger membership (now at 11 :) I present the Sixth Issue in the "Weekly Perl Script" series. Each Week, around Saturday or Sunday, I will submit to the list a Perl Script which does something useful, but one which isn't too hard to follow along with and can be modified to attend other tasks. I will post a script to the Jax-PM listserv and allow one week for the group to discuss it; after the week has passed I will either post a follow-up, one which will help describe the functioning of the prior weeks post or we will move on to a new script to discuss that week. Fair enough? BTW: The 'other' members may post scripts and/or questions here as well. I'm not saying that any of them will be answered - but together I am sure we can discover a solution! Here is this weeks offering for your review - (An idea I got from Steve. He may want to post another example, more in-line with his original idea... :) # The following is a modified code fragment from # my own library (other postings covered ideas and # code I had gotten off Usenet and other WWW sources.) #!/usr/local/bin/perl -wT # A script that shows how to # write data-aware routines... use strict; use diagnostics; # -verbose; my $vSub = ''; while () { no strict q/refs/; $vSub = \m/^(.+)$/io; &$$vSub if defined &$$vSub; print "Sorry, I don't see a Subroutine $$vSub\n" unless defined &$$vSub; } exit; sub Sneex { print "Hi from Sneex...\n"; } sub TheCat { print "Hi from SnittyMibs!\n"; } __DATA__ Sneex TheCat NoSubr # End of script... Look at it, think it over, and if you have any questions, please post to the list: jacksonville-pm-list@happyfunball.pm.org Enjoy! -Sneex- :] FCCJ Data Security Group ______________________________________________________________________ Bill Jones Data Security Specialist http://www.fccj.org/cgi/mail?dss The Jacksonville Perl Monger's Group is operated by - Bill -Sneex- Jones ( sneex@usa.net ), to whom send all praises, complaints, or comments...