From jay at jays.net Sat Apr 1 11:50:57 2006 From: jay at jays.net (Jay Hannah) Date: Sat, 01 Apr 2006 13:50:57 -0600 Subject: [Omaha.pm] Meetings and Library In-Reply-To: <3474068.1143699955896.JavaMail.?@fh064.dia.cp.net> References: <3474068.1143699955896.JavaMail.?@fh064.dia.cp.net> Message-ID: <442ED9A1.7050606@jays.net> griffinheart at go.com wrote: > When does the group hold meetings? Yes, we have meetings every month. Sometimes more often than that when people are interested in (and have time for) specific topics and send out an invite. > I saw the location but not the time. http://omaha.pm.org/ I'm pretty sure it says "7pm". :) > Additionally, I saw the group had a "Perl library." Would I be able > to borrow some introductory Perl books? Absolutely. The books are available for everyone to borrow. They're stored at Reboot the User, and are lonely, so they'd be happy to have you take them home for a while. :) Andy Lester wrote: > Also, do you guys just meet, or have talks? I'd love to come out and talk to the group. Well, we meet and then 90% of the time I end up rambling about whatever. I've done some "formal" presentations, but usually we're just winging it. Guest speakers/talkers very welcome! Come on down! The group is wide open to everyone's ideas/thoughts/talks. In lieu of any alternatives, whoever shows up gets mine. :) j From andy at petdance.com Sat Apr 1 12:52:14 2006 From: andy at petdance.com (Andy Lester) Date: Sat, 1 Apr 2006 14:52:14 -0600 Subject: [Omaha.pm] Meetings and Library In-Reply-To: <442ED9A1.7050606@jays.net> References: <3474068.1143699955896.JavaMail.?@fh064.dia.cp.net> <442ED9A1.7050606@jays.net> Message-ID: <05F5B777-DE3C-4788-8D70-0C976F3E472A@petdance.com> > Well, we meet and then 90% of the time I end up rambling about > whatever. I've done some "formal" presentations, but usually we're > just winging it. Guest speakers/talkers very welcome! Come on down! Let's figure out when, and can you promote it? How many people usually come? xoa -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From jay at jays.net Sat Apr 1 20:00:11 2006 From: jay at jays.net (Jay Hannah) Date: Sat, 01 Apr 2006 22:00:11 -0600 Subject: [Omaha.pm] Meetings and Library In-Reply-To: <05F5B777-DE3C-4788-8D70-0C976F3E472A@petdance.com> References: <3474068.1143699955896.JavaMail.?@fh064.dia.cp.net> <442ED9A1.7050606@jays.net> <05F5B777-DE3C-4788-8D70-0C976F3E472A@petdance.com> Message-ID: <442F4C4B.4030409@jays.net> Andy Lester wrote: > Let's figure out when, and can you promote it? How many people > usually come? I'll do my best. We usually only have 3-4 people. What's the topic? Perhaps I could pull from the other groups I'm in too. We've had out-of-town attendees a couple times, but we've never had a speaker from outside Omaha. That'd be great! j From andy at petdance.com Sat Apr 1 20:54:44 2006 From: andy at petdance.com (Andy Lester) Date: Sat, 1 Apr 2006 22:54:44 -0600 Subject: [Omaha.pm] Meetings and Library In-Reply-To: <442F4C4B.4030409@jays.net> References: <3474068.1143699955896.JavaMail.?@fh064.dia.cp.net> <442ED9A1.7050606@jays.net> <05F5B777-DE3C-4788-8D70-0C976F3E472A@petdance.com> <442F4C4B.4030409@jays.net> Message-ID: <9FDA3E17-3A16-4E6F-9C55-C78132D826AA@petdance.com> > I'll do my best. We usually only have 3-4 people. What's the topic? > Perhaps I could pull from the other groups I'm in too. > > We've had out-of-town attendees a couple times, but we've never had > a speaker from outside Omaha. That'd be great! Three or four? that's not much at all, but maybe if there was a definite topic, and it was publicized, you'd get more. I can talk about tons of stuff. Take a look at http://petdance.com/ resume, the section on talks I've given. xoa -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From jhannah at omnihotels.com Tue Apr 4 18:43:29 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Tue, 4 Apr 2006 20:43:29 -0500 Subject: [Omaha.pm] my $a = blah(); Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432AA0@exchange2k3.omnihotels.net> Wow. On a quiz I would have said that this would print "7". Not "8"... I was sure the 8 would have been silenty ignored. j $ cat j.pl my $a = blah(); print "$a\n"; sub blah { return (7,8); } $ perl j.pl 8 From andy at petdance.com Tue Apr 4 18:59:28 2006 From: andy at petdance.com (Andy Lester) Date: Tue, 4 Apr 2006 20:59:28 -0500 Subject: [Omaha.pm] my $a = blah(); In-Reply-To: <29AB736ABCE5C745ABF9C93B02F2C27B04432AA0@exchange2k3.omnihotels.net> References: <29AB736ABCE5C745ABF9C93B02F2C27B04432AA0@exchange2k3.omnihotels.net> Message-ID: <4BEC1F40-3941-40EF-8CC6-AA140EDCF094@petdance.com> > $ cat j.pl > my $a = blah(); > print "$a\n"; > > sub blah { > return (7,8); > } > > $ perl j.pl > 8 Perl knows that blah() is being called in scalar context, so it evaluates (7,8) in scalar context, which is 8, because it's the rightmost value after the comma. Now, if you'd said my ($a) = blah(); then $a will be 7, and 8 gets ignored. xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060405/64a57988/attachment.html From griffinheart at go.com Tue Apr 4 20:43:49 2006 From: griffinheart at go.com (griffinheart@go.com) Date: Wed, 5 Apr 2006 03:43:49 +0000 (UTC) Subject: [Omaha.pm] Books Message-ID: <33442843.1144208629183.JavaMail.?@fh033.dia.cp.net> Might I be able to borrow some Perl books at some time other than next weeks meeting? I have a class from 7-9pm on Tuesday nights (and not a class I can miss either). Griffinheart From dan at linder.org Wed Apr 5 17:46:10 2006 From: dan at linder.org (Daniel Linder) Date: Wed, 5 Apr 2006 19:46:10 -0500 (CDT) Subject: [Omaha.pm] SAMPLE: Timed execute of external command with timeout. Message-ID: <27786.64.241.37.140.1144284370.squirrel@mail.linder.org> I thought I would thrown this out to the world incase anyone needs this in the future.? Might help those of us who "Google" though new challenges... :-) Months ago I wrote a script that ran an external program and parsed the output for errors.? Unfortunatly, one of the errors that I did not anticipate was the external program hanging forever.? The usual ???? $result = `/path/to/cmd`; hung and never returned -- thus the script never completed. I ended up writing this subroutine to call the command with a timeout window defined. example: ???? ($TimeoutStatus, $CmdResult) = timedexec(90,"/path/to/cmd"); This will call the program "command" and wait 90 seconds for it to complete.? The returned value in $TimeoutStatus will be 0(success) or 1(failure).? The value in $CmdResult will be the text output returned by the command (to stdout). Dan sub timedexec { # timedexec : This subroutine will run a command within a specified time #???????????? window (in seconds). # RETURNS : Returns an array of two elements: #? Success : first element is 0 #??????????? second element is the text returned by the command. #? Failure : first element is 1 #??????????? second element is empty. # ??????? my $alarm=shift; ??????? my $CMD=shift; ??????? my $result = ""; ??????? my $status = 0; ??????? eval { ??????????????? local $SIG{ALRM} = sub { die "alarm\n" }; # \n required ??????????????? alarm $alarm; ??????????????? $result = `$CMD`; ??????????????? alarm 0; ??????? }; ??????? die if $@ && $@ ne "alarm\n";?????? # propagate errors ??????? if ($@) { ??????????????? # timed out : return the error code. ??????????????? $status=1; ??????????????? $result=""; ??????? } ??????? else { ??????????????? # didn't time out : return a success code. ??????????????? $status=0; ??????? } ??????? return ($status, $result); } - - - - "Wait for that wisest of all counselors, time." -- Pericles "I do not fear computers, I fear the lack of them." -- Isaac Asimov "Soon we will be able to harness the rotational energy from Orwell's grave to solve all world energy problems." -- /. user GigsVT (208848) GPG fingerprint:6FFD DB94 7B96 0FD8 EADF 2EE0 B2B0 CC47 4FDE 9B68 -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060406/2493a230/attachment.html From jay at jays.net Thu Apr 6 06:16:40 2006 From: jay at jays.net (Jay Hannah) Date: Thu, 06 Apr 2006 08:16:40 -0500 Subject: [Omaha.pm] Books In-Reply-To: <33442843.1144208629183.JavaMail.?@fh033.dia.cp.net> References: <33442843.1144208629183.JavaMail.?@fh033.dia.cp.net> Message-ID: <443514B8.3090809@jays.net> griffinheart at go.com wrote: > Might I be able to borrow some Perl books at some time other than next > weeks meeting? I have a class from 7-9pm on Tuesday nights (and not a > class I can miss either). Sure! You can head down to the store any time its open and borrow books: http://www.reboottheuser.com/ "Store Hours & Directions" j From dave.nerd at gmail.com Thu Apr 6 08:37:03 2006 From: dave.nerd at gmail.com (Dave M) Date: Thu, 6 Apr 2006 10:37:03 -0500 Subject: [Omaha.pm] Meetings and Library Message-ID: <9ac12b1c0604060837h60bb5455ufcec59175206ae86@mail.gmail.com> > I'll do my best. We usually only have 3-4 people. What's the topic? > Perhaps I could pull from the other groups I'm in too. > > We've had out-of-town attendees a couple times, but we've never had > a speaker from outside Omaha. That'd be great! > > Three or four? that's not much at all, but maybe if there was a > definite topic, and it was publicized, you'd get more. > > I can talk about tons of stuff. Take a look at http://petdance.com/ > resume, the section on talks I've given. > I'd be interested in showing up at the next meeting as well.* Will you be announcing it on the website? Dave * My resume, unfortunately, looks nothing like Andy's. :) I'd just like to show up. From jhannah at omnihotels.com Fri Apr 7 05:59:51 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Fri, 7 Apr 2006 07:59:51 -0500 Subject: [Omaha.pm] April meeting cancelled Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432ABD@exchange2k3.omnihotels.net> Howdy all -- Sorry, but my calendar has become triple-stacked for the next two weeks, and April 11th is no longer workable for me. I looked at rescheduling, but I have so many conflicts I don't see a good hole. If someone else wants to organize/lead, go for it! Otherwise, see you in May! http://omaha.pm.org/ Next Meeting: Tuesday, May 9th 2006 @ 7pm! Thanks, j From ryan at cfwebtools.com Fri Apr 7 10:40:21 2006 From: ryan at cfwebtools.com (Ryan Stille) Date: Fri, 07 Apr 2006 12:40:21 -0500 Subject: [Omaha.pm] April meeting Message-ID: <4436A405.2010903@cfwebtools.com> An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060407/b4107501/attachment.html From jay at jays.net Fri Apr 7 18:55:03 2006 From: jay at jays.net (Jay Hannah) Date: Fri, 07 Apr 2006 20:55:03 -0500 Subject: [Omaha.pm] April meeting In-Reply-To: <4436A405.2010903@cfwebtools.com> References: <4436A405.2010903@cfwebtools.com> Message-ID: <443717F7.8040200@jays.net> Ryan Stille wrote: > I've been off the list a while, just joined back up. I notice the > website says the next meeting is in May. Is there no April meeting? Correct. http://mail.pm.org/pipermail/omaha-pm/2006-April/000924.html j From jay at jays.net Fri Apr 7 18:57:31 2006 From: jay at jays.net (Jay Hannah) Date: Fri, 07 Apr 2006 20:57:31 -0500 Subject: [Omaha.pm] Meetings and Library In-Reply-To: <9ac12b1c0604060837h60bb5455ufcec59175206ae86@mail.gmail.com> References: <9ac12b1c0604060837h60bb5455ufcec59175206ae86@mail.gmail.com> Message-ID: <4437188B.4060402@jays.net> Dave M wrote: > I'd be interested in showing up at the next meeting as well.* Will you > be announcing it on the website? Almost every month we stick to our schedule. Our next meeting is always accurate on our website: http://omaha.pm.org And I almost always announce upcoming meetings on this mailing list a few days before the meeting to remind people. Sorry I had to cancel April. Crazy busy lately. j From jhannah at omnihotels.com Mon Apr 10 04:18:27 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Mon, 10 Apr 2006 06:18:27 -0500 Subject: [Omaha.pm] not defined $j || scalar @$j == 0 Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432AD4@exchange2k3.omnihotels.net> Doh. "use strict" pukes even when a short-circuit operator stops the right side from being evaluated... I was trying to have my if test below trap when (1) $j is undef (2) $j is [ ] But apparently "use strict" is too... mmm... strict. j $ cat j.pl use strict; my $j; if (not defined $j || scalar @$j == 0) { print "yup\n"; } $ perl j.pl Can't use an undefined value as an ARRAY reference at j.pl line 4. From jhannah at omnihotels.com Mon Apr 10 04:22:28 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Mon, 10 Apr 2006 06:22:28 -0500 Subject: [Omaha.pm] not defined $j || scalar @$j == 0 Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432AD5@exchange2k3.omnihotels.net> I settled for this pattern. My what-to-do block has to appear twice. ick. j if (not defined $j) { print "yup\n"; } elsif (scalar @$j == 0) { print "yup\n"; } > -----Original Message----- > From: Jay Hannah > Sent: Monday, April 10, 2006 11:18 AM > To: 'omaha-pm at pm.org' > Subject: not defined $j || scalar @$j == 0 > > > Doh. "use strict" pukes even when a short-circuit operator > stops the right side from being evaluated... > > I was trying to have my if test below trap when > (1) $j is undef > (2) $j is [ ] > > But apparently "use strict" is too... mmm... strict. > > j > > > $ cat j.pl > use strict; > > my $j; > if (not defined $j || scalar @$j == 0) { > print "yup\n"; > } > > $ perl j.pl > Can't use an undefined value as an ARRAY reference at j.pl line 4. > > From andy at petdance.com Mon Apr 10 06:12:00 2006 From: andy at petdance.com (Andy Lester) Date: Mon, 10 Apr 2006 08:12:00 -0500 Subject: [Omaha.pm] not defined $j || scalar @$j == 0 In-Reply-To: <29AB736ABCE5C745ABF9C93B02F2C27B04432AD4@exchange2k3.omnihotels.net> References: <29AB736ABCE5C745ABF9C93B02F2C27B04432AD4@exchange2k3.omnihotels.net> Message-ID: > $ cat j.pl > use strict; > > my $j; > if (not defined $j || scalar @$j == 0) { > print "yup\n"; > } It's a precedence issue. What you've got there is if ( (not ( (defined $j) || (scalar @$j == 0) ) ) Use parentheses. my $j; if ((not defined $j) || (scalar @$j == 0)) { print "yup\n"; } Or even more idiomatically: if ( !$j || !@$j ) xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From robert.fulkerson at gmail.com Tue Apr 11 18:52:17 2006 From: robert.fulkerson at gmail.com (Robert A. Fulkerson) Date: Tue, 11 Apr 2006 20:52:17 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) Message-ID: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> Hello all, Well, it's that time again. My CSCI 2850, "Programming on the Internet" class here at UNO is doing their lightning talks over the course of the next two Tuesdays. You are invited to come and see what this semester's students have found interesting in the Perl world. Last semester's talks went well and I'm hoping that this semester's talks go even better. I have attached a PDF of the topics to be covered each night (the 18th and the 25th). Almost all of the topics are Perl-related with a few stray topics about other things. Each evening's talks start at 6:00 PM in room 356 of the Peter Kiewit Institute at 67th & Pacific streets. If anyone on the list would like to do a quick 5-minute talk, there are one or two slots open that we could squeeze you in at the beginning of either night. Just let me know. If you need directions or any other information, please don't hesitate to ask. Thanks, -- b -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060411/d4a6c060/attachment-0001.html -------------- next part -------------- A non-text attachment was scrubbed... Name: 2850 - Talks - 06 - Sp - Lightning Talks Flier.odt Type: application/vnd.oasis.opendocument.text Size: 27796 bytes Desc: not available Url : http://mail.pm.org/pipermail/omaha-pm/attachments/20060411/d4a6c060/attachment-0001.bin From jay at jays.net Tue Apr 11 20:14:02 2006 From: jay at jays.net (Jay Hannah) Date: Tue, 11 Apr 2006 22:14:02 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> References: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> Message-ID: <443C707A.50701@jays.net> Robert A. Fulkerson wrote: > Well, it's that time again. My CSCI 2850, "Programming on the > Internet" class here at UNO is doing their lightning talks over the > course of the next two Tuesdays. You are invited to come and see what > this semester's students have found interesting in the Perl world. Do you have a URL to that .pdf? The attachment didn't seem to broadcast well on the mailing list. > If anyone on the list would like to do a quick 5-minute talk, there > are one or two slots open that we could squeeze you in at the beginning > of either night. Just let me know. Any topic requests? If I try really hard maybe I can think of something sexier than operator overloading this time... :) j From robert.fulkerson at gmail.com Tue Apr 11 20:45:22 2006 From: robert.fulkerson at gmail.com (Robert A. Fulkerson) Date: Tue, 11 Apr 2006 22:45:22 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <443C707A.50701@jays.net> References: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> <443C707A.50701@jays.net> Message-ID: <6cb6eebc0604112045s55301108lb67aeffe0dbef327@mail.gmail.com> > > Do you have a URL to that .pdf? The attachment didn't seem to broadcast > well on the mailing list. Oops! Well, it would help if I didn't send the OpenOffice.org document and sent the PDF instead. D'oh! Let's try that again ... Any topic requests? If I try really hard maybe I can think of something > sexier than operator overloading this time... :) I'll let you take a look at the actual list and see if anything triggers an idea. :) -- b -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060411/0664fdc1/attachment-0001.html -------------- next part -------------- A non-text attachment was scrubbed... Name: 2850 - Talks - 06 - Sp - Flier.pdf Type: application/pdf Size: 28717 bytes Desc: not available Url : http://mail.pm.org/pipermail/omaha-pm/attachments/20060411/0664fdc1/attachment-0001.pdf From kiranbina at gmail.com Wed Apr 12 19:27:57 2006 From: kiranbina at gmail.com (Dr. Dhundy R. Bastola) Date: Wed, 12 Apr 2006 21:27:57 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> Message-ID: <443db735.3460392b.5e6c.ffffb9b8@mx.gmail.com> Bob, Can we attend to listen. Some of the titles are interesting. Kiran _____ From: omaha-pm-bounces+kiranbina=gmail.com at pm.org [mailto:omaha-pm-bounces+kiranbina=gmail.com at pm.org] On Behalf Of Robert A. Fulkerson Sent: Tuesday, April 11, 2006 8:52 PM To: Perl Mongers of Omaha, Nebraska USA Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) Hello all, Well, it's that time again. My CSCI 2850, "Programming on the Internet" class here at UNO is doing their lightning talks over the course of the next two Tuesdays. You are invited to come and see what this semester's students have found interesting in the Perl world. Last semester's talks went well and I'm hoping that this semester's talks go even better. I have attached a PDF of the topics to be covered each night (the 18th and the 25th). Almost all of the topics are Perl-related with a few stray topics about other things. Each evening's talks start at 6:00 PM in room 356 of the Peter Kiewit Institute at 67th & Pacific streets. If anyone on the list would like to do a quick 5-minute talk, there are one or two slots open that we could squeeze you in at the beginning of either night. Just let me know. If you need directions or any other information, please don't hesitate to ask. Thanks, -- b -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060412/bd8d6a58/attachment.html From jay at jays.net Wed Apr 12 20:08:01 2006 From: jay at jays.net (Jay Hannah) Date: Wed, 12 Apr 2006 22:08:01 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <443db735.3460392b.5e6c.ffffb9b8@mx.gmail.com> References: <443db735.3460392b.5e6c.ffffb9b8@mx.gmail.com> Message-ID: <443DC091.7010005@jays.net> Dr. Dhundy R. Bastola wrote: > Can we attend to listen. Some of the titles are interesting. Yes, it's an open invite to everyone on this mailing list. 3 or 4 Perl Mongers showed up last semester. It's really neat to see people using and presenting Perl (and other things) here in Omaha. I went to both sessions last semester, and am going to try to attend both this semester too. Good times. :) j From jay at jays.net Fri Apr 14 06:12:29 2006 From: jay at jays.net (Jay Hannah) Date: Fri, 14 Apr 2006 08:12:29 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <6cb6eebc0604112045s55301108lb67aeffe0dbef327@mail.gmail.com> References: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> <443C707A.50701@jays.net> <6cb6eebc0604112045s55301108lb67aeffe0dbef327@mail.gmail.com> Message-ID: <443F9FBD.9030806@jays.net> Robert A. Fulkerson wrote: >> Any topic requests? If I try really hard maybe I can think of >> something sexier than operator overloading this time... :) > > I'll let you take a look at the actual list and see if anything > triggers an idea. :) Touche. :) If you think anyone might be interested I could give a quick under-the-hood of Perl's Template Toolkit. Normal: https://ssl.omnihotels.com/Omni Debug mode: https://ssl.omnihotels.com/Omni?debug_mode=1 I promise I'd keep it under 5 minutes this time. :) j From jonllmsed at gmail.com Fri Apr 14 18:38:03 2006 From: jonllmsed at gmail.com (Jon Lonowski) Date: Fri, 14 Apr 2006 20:38:03 -0500 Subject: [Omaha.pm] Unicode Extract Message-ID: <5ad2dbbf0604141838mfaea182p884480d4451e6d0c@mail.gmail.com> Is there a method for extracting the unicde value from a one-character string?? $int = extuni(substr($char,0,1)); substr() to ensure that only one character is passed through. From jay at jays.net Sat Apr 15 16:54:41 2006 From: jay at jays.net (Jay Hannah) Date: Sat, 15 Apr 2006 18:54:41 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <6cb6eebc0604151411t1edad67t20760c4033aec3fd@mail.gmail.com> References: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> <443C707A.50701@jays.net> <6cb6eebc0604112045s55301108lb67aeffe0dbef327@mail.gmail.com> <443F9FBD.9030806@jays.net> <6cb6eebc0604151411t1edad67t20760c4033aec3fd@mail.gmail.com> Message-ID: <444187C1.9000004@jays.net> Robert A. Fulkerson wrote: > A quickie tour of Template Toolkit would be awesome. Would you > like to present this coming Tuesday, or would you like an extra week? The 18th is fine. I'll wander into the room at 5:45 or so? j From robert.fulkerson at gmail.com Sun Apr 16 17:56:48 2006 From: robert.fulkerson at gmail.com (Robert A. Fulkerson) Date: Sun, 16 Apr 2006 19:56:48 -0500 Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <444187C1.9000004@jays.net> References: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> <443C707A.50701@jays.net> <6cb6eebc0604112045s55301108lb67aeffe0dbef327@mail.gmail.com> <443F9FBD.9030806@jays.net> <6cb6eebc0604151411t1edad67t20760c4033aec3fd@mail.gmail.com> <444187C1.9000004@jays.net> Message-ID: <6cb6eebc0604161756p746985e2g3fb5ac725ad884d2@mail.gmail.com> Jay, Yup, 5:45 should be fine. I'll put you at the end of the evening so that the students don't feel like I've upstaged them with a professional Perl programmer. :) -- b On 4/15/06, Jay Hannah wrote: > > Robert A. Fulkerson wrote: > > A quickie tour of Template Toolkit would be awesome. Would you > > like to present this coming Tuesday, or would you like an extra week? > > The 18th is fine. I'll wander into the room at 5:45 or so? > > j > > _______________________________________________ > Omaha-pm mailing list > Omaha-pm at pm.org > http://mail.pm.org/mailman/listinfo/omaha-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060416/596008f7/attachment.html From jhannah at omnihotels.com Mon Apr 17 13:39:47 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Mon, 17 Apr 2006 15:39:47 -0500 Subject: [Omaha.pm] Fun w/ autovivification Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432B68@exchange2k3.omnihotels.net> $ cat j.pl my $a = {}; # This should fail: check(); # And doing this has no effect: my $j = $$a{1}; check(); # But once we do this $$a{1} magically springs into existence... my $j = $$a{1}{2}; check(); sub check { if (exists $$a{1}) { print "yup\n"; } else { print "nope\n"; } } $ perl j.pl nope nope yup More info: http://en.wikipedia.org/wiki/Autovivification j From ajgrothe at yahoo.com Mon Apr 17 21:30:58 2006 From: ajgrothe at yahoo.com (Aaron Grothe) Date: Mon, 17 Apr 2006 21:30:58 -0700 (PDT) Subject: [Omaha.pm] Off Topic - ITinOmaha.org Are we missing anybody? Message-ID: <20060418043058.14758.qmail@web34215.mail.mud.yahoo.com> Hi, I've been working with a couple of friends on putting together a site for all the IT user groups and events in Omaha. We've just launched the site at http://www.ITinOmaha.org Are there any groups we're missing? Doing the site we've discovered a lot of grups we didn't know existed. E.g. Omaha has a Dynamic Language Group from combining the Smalltalk and Ruby user groups. I would greatly appreciate pointers to any groups or events we're missing, so we can get the site as complete as possible. Thanks, Aaron -=-=- "The Journey is the Reward" - Old Zen Buddhist Saying __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com From jay at jays.net Tue Apr 18 07:23:41 2006 From: jay at jays.net (Jay Hannah) Date: Tue, 18 Apr 2006 09:23:41 -0500 (CDT) Subject: [Omaha.pm] Lightning Talks from UNO, Take 2! :) In-Reply-To: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> References: <6cb6eebc0604111852p40abe0cftff20429291f56d8b@mail.gmail.com> Message-ID: Oops. I've had a family conflict arise, so I can't attend tonight. I really do recommend everyone see the lightning talks, they're great. I'll do my little dog and pony show at round 2 next Tuesday, if that's OK w/ Robert. j From jay at jays.net Tue Apr 18 10:36:04 2006 From: jay at jays.net (Jay Hannah) Date: Tue, 18 Apr 2006 12:36:04 -0500 Subject: [Omaha.pm] Off Topic - ITinOmaha.org Are we missing anybody? In-Reply-To: <20060418043058.14758.qmail@web34215.mail.mud.yahoo.com> References: <20060418043058.14758.qmail@web34215.mail.mud.yahoo.com> Message-ID: <44452384.7030708@jays.net> Aaron Grothe wrote: > I've been working with a couple of friends on putting together a site > for all the IT user groups and events in Omaha. We've just > launched the site at http://www.ITinOmaha.org > > Are there any groups we're missing? Doing the site we've discovered > a lot of grups we didn't know existed. E.g. Omaha has a Dynamic > Language Group from combining the Smalltalk and Ruby user groups. Our wiki has all the ones I know about: http://omaha.pm.org/kwiki/index.cgi?OmahaUserGroups Whats the URL for the Dynamic Language Group? j From jhannah at omnihotels.com Tue Apr 18 11:19:14 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Tue, 18 Apr 2006 13:19:14 -0500 Subject: [Omaha.pm] Weird... I'm voluntarily using map Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432B75@exchange2k3.omnihotels.net> Huh... I'm starting to get pretty comfortable w/ map... Old dog, new tricks. :) j # Given this array ref: my $j = [ "a", "b", "c" ]; # Make a hash so we can do key-based lookups: my %j = map { $_ => 1 } @$j; --------- $ perl -d -e '1' Loading DB routines from perl5db.pl version 1.28 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(-e:1): 1 auto(-1) DB<1> o pager=less pager = '|less' DB<2> $j = [ "a", "b", "c" ]; DB<3> %j = map { $_ => 1 } @$j; DB<4> x %j 0 'c' 1 1 2 'a' 3 1 4 'b' 5 1 From jonllmsed at gmail.com Tue Apr 18 17:47:58 2006 From: jonllmsed at gmail.com (Jon Lonowski) Date: Tue, 18 Apr 2006 19:47:58 -0500 Subject: [Omaha.pm] Errors in Two-Dimensional Arrays Message-ID: <5ad2dbbf0604181747p23ca0cd8g290c276d18ff95c1@mail.gmail.com> my @conn; ...is for tracking essential user information. Understanding that $usernick is properly set to their screenname, I'm trying to get a 2 dimensional array through @conn and $usernick w/ no strict "refs"; So far, I've tried the following setups: $conn[$usernick][0] = $conn_id; $conn[$usernick]->[0] = $conn_id; $conn[$usernick[0]] = $conn_id; # this one didn't even run..but, I still tried it. $conn[$$usernick][0] = $conn_id; $conn[$$usernick]->[0] = $conn_id; Now...this variable, along with $conn[$usernick][1] and $conn[$usernick][2] are set when someone properly logs into an account. if (!$conn[$usernick][0]) { # login process } else { # send "already logged in" error message to user } For some reason, this test fails for any users after the 1st has logged in and, no matter who it is, $conn[$usernick][0] equals the $conn_id of the first user... Example: # user1 and user2 log in: # inserting values of $usernick ... if ($conn["user1"][0]) { # login process } # passes if ($conn["user2"][0]) { # login process } # fails; and they recieve the "already logged in" error. My only guess is that it's reading it as $conn[0] for both and ignoring the [$usernick] bracket. From andy at petdance.com Tue Apr 18 17:54:32 2006 From: andy at petdance.com (Andy Lester) Date: Tue, 18 Apr 2006 19:54:32 -0500 Subject: [Omaha.pm] Errors in Two-Dimensional Arrays In-Reply-To: <5ad2dbbf0604181747p23ca0cd8g290c276d18ff95c1@mail.gmail.com> References: <5ad2dbbf0604181747p23ca0cd8g290c276d18ff95c1@mail.gmail.com> Message-ID: > > Understanding that $usernick is properly set to their screenname, I'm > trying to get a 2 dimensional array through @conn and $usernick w/ no > strict "refs"; That's problem #1. Turn strict back on. You're dealing with references here. Perl doesn't have two-dimensional arrays. You may have arrays of array references that are effectively 2-dimensional arrays, but they're not. Whenever you're dealing with structures of structures, use Data::Dumper to look at the format of your data. In your case, try this: use Data::Dumper; print Dumper( @conn ); And then report back with what it shows. We'll get this licked. xoa -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From ajgrothe at yahoo.com Wed Apr 19 09:01:17 2006 From: ajgrothe at yahoo.com (Aaron Grothe) Date: Wed, 19 Apr 2006 09:01:17 -0700 (PDT) Subject: [Omaha.pm] Off Topic - ITinOmaha.org Are we missing anybody? In-Reply-To: <44452384.7030708@jays.net> Message-ID: <20060419160117.66406.qmail@web34203.mail.mud.yahoo.com> Jay Hannah wrote: Whats the URL for the Dynamic Language Group? The home page for the Dynamic Language User Group is http://www.blainebuxton.com/odynug/ Regards, Aaron -=-=- "The Journey is the Reward" - Old Zen Buddhist Saying --------------------------------- Yahoo! Messenger with Voice. Make PC-to-Phone Calls to the US (and 30+ countries) for 2?/min or less. -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/omaha-pm/attachments/20060419/18fd3a63/attachment.html From jhannah at omnihotels.com Fri Apr 21 16:17:09 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Fri, 21 Apr 2006 18:17:09 -0500 Subject: [Omaha.pm] more source code humor Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432B97@exchange2k3.omnihotels.net> laugh... j -----Original Message----- From: Sydney Goodwin Sent: Thursday, April 20, 2006 8:51 AM Ok - can you add in a rule about what to do if Jay is not here...I was rather amused that Jay has to get slapped twice and you only get one punch. -----Original Message----- From: Sean Baker Sent: Wednesday, April 19, 2006 4:17 PM #!/usr/bin/perl use strict; my $sean = new Person(type=>"Programmer"); my $tele = new Telephone; my $sydney = new Person(type=>"GDD"); my $andria = new Person(type=>"GDD"); my $jay = new Person(type=>"Lord of Fire"); if ($sean->fix_problem) { $tele->call(extension=>512); $sean->speak("problem fixed"); $andria->speak("You are so awesome"); $sydney->set_happiness (1); $andria->set_happiness ($sydney->get_happiness); $jay->set_happiness ($andria->get_happiness); $sean->set_happiness ($jay->get_happiness); } else { $sydney->slap($jay); $andria->slap($jay); $jay->punch($sean); $sean->emote("pain"); die $sean; } $sean->disconnect; exit; That only took 5 minutes btw.... Sean Baker From jay at jays.net Sun Apr 23 10:08:57 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 23 Apr 2006 12:08:57 -0500 Subject: [Omaha.pm] More user groups Message-ID: <444BB4A9.6080304@jays.net> http://omaha.pm.org/kwiki/index.cgi?OmahaUserGroups Added: - Omaha Python Users - Dynamic Language User Group I'm looking forward to the Ruby on Rails demo via the 2nd link. j From jhannah at omnihotels.com Mon Apr 24 14:44:07 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Mon, 24 Apr 2006 16:44:07 -0500 Subject: [Omaha.pm] FW: top 10 jobs Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432BB6@exchange2k3.omnihotels.net> > http://money.cnn.com/magazines/moneymag/bestjobs/top50/index.html Wow. "Software engineer" got #1... j From jhannah at omnihotels.com Tue Apr 25 12:54:09 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Tue, 25 Apr 2006 14:54:09 -0500 Subject: [Omaha.pm] tweak Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432BC8@exchange2k3.omnihotels.net> Another quickie for work today... Before: my $pageid; foreach my $param ($q->param) { next if ($param !~ /^view__Record__/); $param =~ s/^(view__Record__)//; $pageid = $param; } My after: my $pageid; foreach ($q->param) { s/^view__Record__// || next; $pageid = $_; last; } Untested, so mine might not even work. If it works, I like mine better. :) (1) more readable IMHO (2) since there's only supposed to by 1 pageid, mine skips all other params after pageid is found. j From andy at petdance.com Tue Apr 25 13:06:20 2006 From: andy at petdance.com (Andy Lester) Date: Tue, 25 Apr 2006 15:06:20 -0500 Subject: [Omaha.pm] tweak In-Reply-To: <29AB736ABCE5C745ABF9C93B02F2C27B04432BC8@exchange2k3.omnihotels.net> References: <29AB736ABCE5C745ABF9C93B02F2C27B04432BC8@exchange2k3.omnihotels.net> Message-ID: <20060425200620.GA24362@petdance.com> On Tue, Apr 25, 2006 at 02:54:09PM -0500, Jay Hannah (jhannah at omnihotels.com) wrote: > My after: > > my $pageid; > foreach ($q->param) { > s/^view__Record__// || next; > $pageid = $_; > last; > } You can use that s/// in a boolean context foreach ($q->param) { if (s/^view__Record__//) { $pageid = $_; last; } } If you don't want to do a replacement for some reason: foreach ($q->param) { if (/^view__Record__(.+)/) { $pageid = $1; last; } } This last one I think is the clearest, because what you're saying is "match view__Record__ followed by something else, and I want to keep the something else". xoa -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From jay at jays.net Thu Apr 27 03:09:45 2006 From: jay at jays.net (Jay Hannah) Date: Thu, 27 Apr 2006 05:09:45 -0500 Subject: [Omaha.pm] tweak In-Reply-To: <20060425200620.GA24362@petdance.com> References: <29AB736ABCE5C745ABF9C93B02F2C27B04432BC8@exchange2k3.omnihotels.net> <20060425200620.GA24362@petdance.com> Message-ID: <44509869.5010501@jays.net> Andy Lester wrote: > foreach ($q->param) { > if (/^view__Record__(.+)/) { > $pageid = $1; > last; > } > } > > This last one I think is the clearest, because what you're saying is > "match view__Record__ followed by something else, and I want to keep the > something else". Wow, that *is* cool. Thanks! j From jay at jays.net Thu Apr 27 04:53:50 2006 From: jay at jays.net (Jay Hannah) Date: Thu, 27 Apr 2006 06:53:50 -0500 Subject: [Omaha.pm] Geneology Database? In-Reply-To: <4282.24.249.104.240.1146084033.squirrel@www.crouch-bachman.org> References: <4282.24.249.104.240.1146084033.squirrel@www.crouch-bachman.org> Message-ID: <4450B0CE.8010700@jays.net> Hi Clay! Nice to "meet" you. :) Clay Crouch wrote: > Well, I guess we are probably related somehow, if you > managed to trace your tree up, over, and down to include > me in it.... > > See http://jays.net/genealogy/Html/I2551.html. > > I was messing around on Google looking for someone in > particular and your site got returned among the results. > > I checked it out, surfing this way and that.... > > First thing: You have my fater's name listed as "Donald". > > See http://jays.net/genealogy/Html/I2550.html. > > His name was "Daniel L. Crouch", 10/17/44 - 9/13/96. Thanks for the update! > Everything else I saw starting with my entry and working > up, sideways, and back down seemed to be approximately > correct for each generation. At least, until I got away > from the people I know/knew personally. > > Second, I tried surfing up the tree in just about every > direction available. Kept hitting dead ends trying to go > up my tree to see where yours and my lines merged.... > > How are we related if my line dead-ends upward? > > Can you pull an adjacency matrix or connection graph from > your database that shows how our lines are linked? Excellent! You've given me an excuse to finally play with some software Paul Johnson sent me back in January. Since in my dataset I am "I0313" and you are "I2551" lets see if this relation.pl program Paul sent me works... $ ./relation.pl -gedcom_file jay.ged ........................................................ Enter person to compute relation from: I0313 Enter 1 for a single relation, 2 for several, 3 for all: 2 Enter 0 for brief, 1 for English-language relationships: 0 Enter 0 to omit, 1 to output names of all intervening relatives: 0 ................... Enter person to compute relation to: I2551 I0313 Jay Weston HANNAH is not related to I2551 Clay Daniel CROUCH Ack! Hmm... Let's make sure this thing is working at all... Enter person to compute relation to: I215 I0313 Jay Weston HANNAH ffffff I215 James C. HANNAH Yes, the program is telling me that James C. HANNAH is my father's father's father's father's father's father ("ffffff")... And it seems to track other obscure relations of mine correctly: Enter person to compute relation to: I711 I0313 Jay Weston HANNAH wfffffmff I711 William C. THOMSON Enter person to compute relation to: I94 I0313 Jay Weston HANNAH mffmf I94 George CHAPMAN Enter person to compute relation to: I3531 I0313 Jay Weston HANNAH mmfffffffff I3531 William STARK Enter person to compute relation to: I3186 I0313 Jay Weston HANNAH mmbzzwm I3186 JUNE Enter person to compute relation to: I3495 I0313 Jay Weston HANNAH mmffffffm I3495 Sarah (tentative) LARKIN\LAYCOCK Enter person to compute relation to: I2060 I0313 Jay Weston HANNAH ffmmmfmmmmffm I2060 Joan MARSH Yet when I randomly choose some other people out of my dataset it reports no relation: Enter person to compute relation to: I1891 I0313 Jay Weston HANNAH is not related to I1891 Jennifer L. BODHOLDT Enter person to compute relation to: I0661 I0313 Jay Weston HANNAH is not related to I0661 Mary Elizabeth "Marie" KNIGHT So I guess its working and we're not related (at least inside the confines of my dataset). (All 6 billion of us are related if you go back far enough, right? -grin-) Since we're not related (that I know of) I'm guessing that your inclusion in my data was due to some errant mapping at some point that was later removed/pruned/corrected. I guess I'll remove your entire pocket of relatives unless you want me to leave you online for some reason. :) > If it turns out that we are indeed related, would you be > interested in talking with my mother? She is the one who > took on the "unofficial" geneology work for her side of > the family, with Foila Gosser (Joy) as kind of the center > peg; the starting point. > > See http://jays.net/genealogy/Html/I2478.html. > > I don't know what information she has, as geneology has > never really been one of my interests, so I never asked. > But occasionally, she talks about it, and it seems like > she has quite a bit. Like some of it back to the 1600's > in Europe or some such.... Its up to you. Online genealogy is just one of my many hobbies I try to find time for every once in a while. :) > Computer Geek, eh? Me too. UNIX Sysadmin for a large > cell phone company. (HP-UX, Solaris, and Linux) :^) > > I look forward to reading your reply. > > -- > --Clay-- > root at universe> chown -R :us ./base > root at universe> I like your sig. :) I'm mostly a Perl geek. I know enough Linux to earn a living and break it in creative ways. :) All the best, j From jhannah at omnihotels.com Thu Apr 27 07:51:37 2006 From: jhannah at omnihotels.com (Jay Hannah) Date: Thu, 27 Apr 2006 09:51:37 -0500 Subject: [Omaha.pm] FW: Perl banned for being too good - from 1997 Message-ID: <29AB736ABCE5C745ABF9C93B02F2C27B04432BEE@exchange2k3.omnihotels.net> :) I wonder if that contest is still around? j -----Original Message----- From: Sean J. Edwards Originally posted on www.perl.org in 1997: Perl "Too Good" This is a true story. Names have not been changed. UCLA's Computer Science Undergraduate Association regularly hosts its programming competition. Contestants are given six complex problems and have three hours to write programs to solve as many of the problems as possible. In 1997, the rules stated that any programming language could be used so long as you solved the problem, so then-undergraduate Keith Chiem entered and used Perl. Keith did not merely win, he conquered. He solved five of the six problems in the three hours allotted. The second-place two-person team solved only three problems. They, needless to say, were not using Perl. But if you're a UCLA undergraduate contemplating entering the contest and using Perl, don't bother. After Keith's conquest, Perl was banned from the contest. You've got to admire a language that is banned because it makes problems too easy to solve. These days, Keith is reportedly a sysadmin at Yahoo! Inc., and is wondering what to do with the copy of Visual C++ that was his prize. -- -=Sean Edwards=- From jay at jays.net Fri Apr 28 16:47:27 2006 From: jay at jays.net (Jay Hannah) Date: Fri, 28 Apr 2006 18:47:27 -0500 Subject: [Omaha.pm] Geneology Database? In-Reply-To: <20060428232903.GH21543@pjcj.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> Message-ID: <4452A98F.5060301@jays.net> Paul Johnson wrote: > On Thu, Apr 27, 2006 at 06:53:50AM -0500, Jay Hannah wrote: >> So I guess its working and we're not related (at least inside the confines >> of my dataset). (All 6 billion of us are related if you go back far enough, >> right? -grin-) > > Of course, it might be that the original report is broken or that > lines2perl is broken, but you seem to have checked things out fairly > well. > > I'm glad something I wrote if proving somewhat useful ;-) Thanks for > CCing me. Well, with 4000+ people in my GEDCOM I'll never figure it out manually, so we'll just have to assume its working. :) Any chance you've got some magic up your sleeve which can prune my GEDCOM to only those people related to me? Some magical concoction of toolsets? Thanks! j From jay at jays.net Fri Apr 28 17:12:19 2006 From: jay at jays.net (Jay Hannah) Date: Fri, 28 Apr 2006 19:12:19 -0500 Subject: [Omaha.pm] Geneology Database? Message-ID: <4452AF63.9000608@jays.net> Paul's response. :) j -------- Original Message -------- Subject: Re: Geneology Database? Date: Sat, 29 Apr 2006 02:06:35 +0200 From: Paul Johnson To: Jay Hannah On Fri, Apr 28, 2006 at 06:47:27PM -0500, Jay Hannah wrote: > Any chance you've got some magic up your sleeve which can prune my GEDCOM > to only those people related to me? Some magical concoction of toolsets? > Thanks! I don't think there's anything built in (he says without looking), but there are ancestors and descendents methods which could be used to create a closure in a fairly inefficient way. Or parents, children and siblings methods with could probably do the job more efficiently. Or I'll bet there's another useful LifeLines script out there somewhere you could translate :) -- Paul Johnson - paul at pjcj.net http://www.pjcj.net From jay at jays.net Sat Apr 29 14:08:14 2006 From: jay at jays.net (Jay Hannah) Date: Sat, 29 Apr 2006 16:08:14 -0500 Subject: [Omaha.pm] Geneology Database? In-Reply-To: <20060429000634.GK21543@pjcj.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> Message-ID: <4453D5BE.4070803@jays.net> Paul Johnson wrote: > On Fri, Apr 28, 2006 at 06:47:27PM -0500, Jay Hannah wrote: >> Any chance you've got some magic up your sleeve which can prune my GEDCOM >> to only those people related to me? Some magical concoction of toolsets? >> Thanks! > > I don't think there's anything built in (he says without looking), but > there are ancestors and descendents methods which could be used to > create a closure in a fairly inefficient way. Or parents, children and > siblings methods with could probably do the job more efficiently. Or > I'll bet there's another useful LifeLines script out there somewhere you > could translate :) Oooo... ftp://ftp.cac.psu.edu/pub/genealogy/lines/reports/INDEX.html partition Jim Eggert Version 8, March 31, 1995 Requires: LifeLines 2.3.3 or higher This program partitions individuals in a database into disjoint partitions. Each partition is composed of people related by one or more multiples of the following relations: parent, sibling, child, spouse. There is no known relationship between people in different partitions. The partitions are written to the report in overview form, full form, or in GEDCOM form, with the partitions delimited by a long line. You will have to edit the GEDCOM output to divide it up into its constituent files to be able to import the GEDCOM back into any application. Sounds perfect. So I used lines2perl to create a Perl script and went for it -- all partitions for my entire GEDCOM. 8 HOURS later it still wasn't done. Amazing. The file is only 1.5 MB, how can it possibly got for 8 hours? So I restarted, trying to get just MY relatives: $ time ./partition.pl -gedcom_file jay.ged reading................................................................. Enter a person for just one partition, nothing for all partitions: I0313 Enter 0 for overview, 1 for full, 2 for GEDCOM report: 2 Enter filename for GEDCOM partition: new.ged 1: 1 5 17 3 167225824 I225 Shirl 24 Jul 2006 55 63 69 125 125 174 178 184 5 167225824 I2 Helen FORD 1 Jan 1912 1 Jan 1998 464 464 478 793 793 843 845 1062 7 153290844 I513 William A. SETON 9 Jan 1861 9 Jul 1866 1519 1519 1595 1598 1804 1809 1809 That's burned 6.5 CPU HOURS so far. Wow. Still using < 50MB of RAM. $ ps -ef | grep perl jhannah 10280 10014 99 09:22 pts/1 06:31:15 /usr/bin/perl -w ./partition.pl -gedcom_file jay.ged $ ps l F UID PID PPID PRI NI VSZ RSS WCHAN STAT TTY TIME COMMAND 0 1000 10280 10014 25 0 49576 47812 - R+ pts/1 391:17 /usr/bin/perl -w ./partition.pl -gedcom_file jay.ged Even top is amazed by this process: top - 16:06:19 up 5 days, 18:19, 1 user, load average: 1.00, 1.00, 1.00 Tasks: 77 total, 3 running, 74 sleeping, 0 stopped, 0 zombie Cpu(s): 99.7% us, 0.0% sy, 0.0% ni, 0.0% id, 0.0% wa, 0.0% hi, 0.3% si Mem: 256968k total, 244480k used, 12488k free, 41020k buffers Swap: 262136k total, 2192k used, 259944k free, 84036k cached PID USER PR NI VIRT RES SHR S %CPU %MEM TIME+ COMMAND 10280 jhannah 25 0 49576 46m 1812 R 99.8 18.6 402:37.17 partition.pl :) This project has forced me to finally learn to use GNU screen. Way cool. I love discovering awesome tools that stopped being developed in 1994. :) I wonder if the native LifeLines script would be fast? j From jay at jays.net Sat Apr 29 14:09:08 2006 From: jay at jays.net (Jay Hannah) Date: Sat, 29 Apr 2006 16:09:08 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: <20060429000634.GK21543@pjcj.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> Message-ID: <4453D5F4.3030701@jays.net> Paul Johnson wrote: > On Fri, Apr 28, 2006 at 06:47:27PM -0500, Jay Hannah wrote: >> Any chance you've got some magic up your sleeve which can prune my GEDCOM >> to only those people related to me? Some magical concoction of toolsets? >> Thanks! > > I don't think there's anything built in (he says without looking), but > there are ancestors and descendents methods which could be used to > create a closure in a fairly inefficient way. Or parents, children and > siblings methods with could probably do the job more efficiently. Or > I'll bet there's another useful LifeLines script out there somewhere you > could translate :) Oooo... ftp://ftp.cac.psu.edu/pub/genealogy/lines/reports/INDEX.html partition Jim Eggert Version 8, March 31, 1995 Requires: LifeLines 2.3.3 or higher This program partitions individuals in a database into disjoint partitions. Each partition is composed of people related by one or more multiples of the following relations: parent, sibling, child, spouse. There is no known relationship between people in different partitions. The partitions are written to the report in overview form, full form, or in GEDCOM form, with the partitions delimited by a long line. You will have to edit the GEDCOM output to divide it up into its constituent files to be able to import the GEDCOM back into any application. Sounds perfect. So I used lines2perl to create a Perl script and went for it -- all partitions for my entire GEDCOM. 8 HOURS later it still wasn't done. Amazing. My GEDCOM is only 1.5 MB (4000ish people), how can it possibly got for 8 hours? So I restarted, trying to get just MY relatives: $ time ./partition.pl -gedcom_file jay.ged reading................................................................. Enter a person for just one partition, nothing for all partitions: I0313 Enter 0 for overview, 1 for full, 2 for GEDCOM report: 2 Enter filename for GEDCOM partition: new.ged 1: 1 5 17 3 167225824 I225 Shirl 24 Jul 2006 55 63 69 125 125 174 178 184 5 167225824 I2 Helen FORD 1 Jan 1912 1 Jan 1998 464 464 478 793 793 843 845 1062 7 153290844 I513 William A. SETON 9 Jan 1861 9 Jul 1866 1519 1519 1595 1598 1804 1809 1809 That's burned 6.5 CPU HOURS so far. Wow. Still using < 50MB of RAM. $ ps -ef | grep perl jhannah 10280 10014 99 09:22 pts/1 06:31:15 /usr/bin/perl -w ./partition.pl -gedcom_file jay.ged $ ps l F UID PID PPID PRI NI VSZ RSS WCHAN STAT TTY TIME COMMAND 0 1000 10280 10014 25 0 49576 47812 - R+ pts/1 391:17 /usr/bin/perl -w ./partition.pl -gedcom_file jay.ged Even top is amazed by this process: top - 16:06:19 up 5 days, 18:19, 1 user, load average: 1.00, 1.00, 1.00 Tasks: 77 total, 3 running, 74 sleeping, 0 stopped, 0 zombie Cpu(s): 99.7% us, 0.0% sy, 0.0% ni, 0.0% id, 0.0% wa, 0.0% hi, 0.3% si Mem: 256968k total, 244480k used, 12488k free, 41020k buffers Swap: 262136k total, 2192k used, 259944k free, 84036k cached PID USER PR NI VIRT RES SHR S %CPU %MEM TIME+ COMMAND 10280 jhannah 25 0 49576 46m 1812 R 99.8 18.6 402:37.17 partition.pl :) This project has forced me to finally learn to use GNU screen. Way cool. I love discovering awesome tools that stopped being developed in 1994. :) I wonder if the native LifeLines script would be fast? j From jay at jays.net Sun Apr 30 08:17:00 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 10:17:00 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: <4453D5F4.3030701@jays.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> <4453D5F4.3030701@jays.net> Message-ID: <4454D4EC.8000901@jays.net> LOL!! 20.6 hours later it blew up. :) I guess I should have tried a MUCH smaller GEDCOM first. Paul: The speed's not really usable, so I'm not going to try to submit a gengedcom() Perl conversion to you. Any thoughts on the speed front? Perhaps I'll install LifeLines and see if the original script works OK or not. Thanks, j === bash-3.00$ time ./partition.pl -gedcom_file jay.ged reading.................................................................... Enter a person for just one partition, nothing for all partitions: I0313 Enter 0 for overview, 1 for full, 2 for GEDCOM report: 2 Enter filename for GEDCOM partition: new.ged 1: 1 5 17 3 167225824 I225 Shirl 24 Jul 2006 55 63 69 125 125 174 178 184 5 167225824 I2 Helen FORD 1 Jan 1912 1 Jan 1998 464 464 478 793 793 843 845 1062 7 153290844 I513 William A. SETON 9 Jan 1861 9 Jul 1866 1519 1519 1595 1598 1804 1809 1809 ^[2442 2442 2713 9 163846892 I550 Jill Kristine TALLEY 20 Jan 1985 d9 167225824 I22 Cheryl BALLS 9 163846892 I55 Huldah BOGUE 30 Oct 1831 4 Dec 1901 9 153290844 I51 Benjamin F. "Frank" BOGUE 1 Jan 1853 1 Jan 1941 3425 3667 3667 3730 3730 3755 3760 3772 3773 3944 3964 3964 4010 4010 4014 4015 4017 4017 4060 4080 4080 4088 4111 4115 4117 4118 4119 4120 Uncaught exception from user code: LifeLines gengedcom function not yet implemented at /usr/lib/perl5/site_perl/5.8.6/Gedcom/LifeLines.pm line 1196, line 3. at /usr/lib/perl5/site_perl/5.8.6/Gedcom/LifeLines.pm line 1196 Gedcom::LifeLines::gengedcom('ARRAY(0xaa137c4)') called at ./partition.pl line 325 main::do_one_partition('Gedcom::Individual=HASH(0x94ceeb4)', 2, 'new.ged\x{a}.') called at ./partition.pl line 209 main::main() called at ./partition.pl line 341 real 1237m21.131s user 1219m32.390s sys 0m6.500s From andy at petdance.com Sun Apr 30 08:19:47 2006 From: andy at petdance.com (Andy Lester) Date: Sun, 30 Apr 2006 10:19:47 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: <4454D4EC.8000901@jays.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> <4453D5F4.3030701@jays.net> <4454D4EC.8000901@jays.net> Message-ID: On Apr 30, 2006, at 10:17 AM, Jay Hannah wrote: > > LOL!! 20.6 hours later it blew up. :) > > I guess I should have tried a MUCH smaller GEDCOM first. I just came in late here. Have you seen Paul Johnson's GEDCOM.pm? xoa -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From jay at jays.net Sun Apr 30 08:29:54 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 10:29:54 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> <4453D5F4.3030701@jays.net> <4454D4EC.8000901@jays.net> Message-ID: <4454D7F2.8000107@jays.net> Andy Lester wrote: > I just came in late here. Have you seen Paul Johnson's GEDCOM.pm? Yup. LifeLines is a scripting language for genealogy. Paul's lines2perl converts LifeLines scripts into Perl scripts. I've been working w/ Paul to try to solve my recent genealogy quandaries w/ his software, including Gedcom(.pm) and Gedcom::LifeLines(.pm). Paul's a genealogy genius. :) j genealogy newb http://jays.net/genealogy/ From jay at jays.net Sun Apr 30 09:07:17 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 11:07:17 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: <4454D4EC.8000901@jays.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> <4453D5F4.3030701@jays.net> <4454D4EC.8000901@jays.net> Message-ID: <4454E0B5.1080003@jays.net> Jay Hannah wrote: > LOL!! 20.6 hours later it blew up. :) > > I guess I should have tried a MUCH smaller GEDCOM first. I installed LifeLines and the the dependencies. partition.ll split my entire GEDCOM into 19 parts in 24 seconds! Sweet... j From jay at jays.net Sun Apr 30 09:32:29 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 11:32:29 -0500 Subject: [Omaha.pm] Geneology Database? In-Reply-To: <2220.24.249.104.240.1146148720.squirrel@www.crouch-bachman.org> References: <4282.24.249.104.240.1146084033.squirrel@www.crouch-bachman.org> <4450B0CE.8010700@jays.net> <2220.24.249.104.240.1146148720.squirrel@www.crouch-bachman.org> Message-ID: <4454E69D.5070701@jays.net> Well, I'll be... We are related. I'm using different software now, and flushed my website again. Here's you: http://jays.net/genealogy/Html/I3502.html And here's how to get to me: I3502 Clay Daniel CROUCH's mother I3494 Cheryl Dawn BAKER's mother I3487 Velma LaVerne GOSSER's mother I3429 Foila Bernice JOY's mother I3392 Elizabeth "Lizzie" MCINTOSH's mother I1373 Cordelia BYERS's brother I1093 Perry BYERS's daughter I1067 Zylpha Alzada BYERS's son I1072 Benjamin Millard HANNAH's son I1076 James Bradley HANNAH's son I1265 Jay Weston HANNAH Wow. How cool is that? j From jay at jays.net Sun Apr 30 12:52:56 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 14:52:56 -0500 Subject: [Omaha.pm] lines2perl: partition.pl Message-ID: <44551598.4010303@jays.net> Paul's response. j -------- Original Message -------- Subject: Re: lines2perl: partition.pl Date: Sun, 30 Apr 2006 19:46:25 +0200 From: Paul Johnson To: Jay Hannah On Sun, Apr 30, 2006 at 10:17:00AM -0500, Jay Hannah wrote: > LOL!! 20.6 hours later it blew up. :) Argh - sorry about that. Yes, there are a few LifeLines functions which I haven't implemented - including all the functions since LifeLines got its new lease of life. > I guess I should have tried a MUCH smaller GEDCOM first. Hmmm. I suppose so. > Paul: The speed's not really usable, so I'm not going to try to submit a > gengedcom() Perl conversion to you. Any thoughts on the speed front? Hey - that's a lame excuse ;-) As far as speed is concerned, LifeLines is a far less capable language than Perl, even with the new functions. Combine that with a fairly mechanical translation into Perl, and you have the potential for a (un)reasonable slowdown. The good news is that using Gedcom.pm doesn't have to be slow. For example, here is code that implements option 1 of partition.ll, that is it will print out details of all people in each partition of the database. It uses the same algorithm as partition.ll - in fact I created it but cutting down the lines2perl translation. It runs quite fast ;-) > Perhaps I'll install LifeLines and see if the original script works OK or > not. Looks like it did in this case, but the relation script didn't. Did you try the relation script natively? #!/usr/bin/perl use strict; use warnings; use Gedcom; use Getopt::Long; my $file; die "usage: $0 -gedcom_file file.ged\n" unless GetOptions("gedcom_file=s" => \$file) && $file; my $ged = Gedcom->new(gedcom_file => $file); my ($partition, $count, %seen); for my $i ($ged->individuals) { next if $seen{$i}; $partition++; my @q = [ $i, 0 ]; while (@q) { my ($i, $hops) = @{shift @q}; next if $seen{$i}++; push @q, [ $_, $hops + 1 ] for ($i->parents, $i->spouse, $i->siblings, $i->children); no warnings "uninitialized"; printf "%5d %3d %3d %7s %32s %15s %15s\n", ++$count, $partition, $hops, $i->xref, $i->name, $i->get_value("birth date"), $i->get_value("death date"); } } -- Paul Johnson - paul at pjcj.net http://www.pjcj.net From jay at jays.net Sun Apr 30 13:25:02 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 15:25:02 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: <20060430174625.GO21543@pjcj.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> <4453D5F4.3030701@jays.net> <4454D4EC.8000901@jays.net> <20060430173953.GN21543@pjcj.net> <20060430174625.GO21543@pjcj.net> Message-ID: <44551D1E.5070000@jays.net> Paul Johnson wrote: > Argh - sorry about that. Yes, there are a few LifeLines functions which > I haven't implemented - including all the functions since LifeLines got > its new lease of life. Did LifeLines (almost?) die at some point? Are you trying to bridge the work into the next generation through your Perl re-write? It'd be terrible to lose all that amazing software to the sands of time... It's a little scary all the LifeLines copyright notices end in the mid 90s. :) >> Paul: The speed's not really usable, so I'm not going to try to submit a >> gengedcom() Perl conversion to you. Any thoughts on the speed front? > > Hey - that's a lame excuse ;-) > > As far as speed is concerned, LifeLines is a far less capable language > than Perl, even with the new functions. Combine that with a fairly > mechanical translation into Perl, and you have the potential for a > (un)reasonable slowdown. I'm sure Perl is infinitely stronger for thousands of tasks. I'm amazed that Perl bends so well to the one thing the entire LifeLines language was invented for. You're an amazing sort of mad scientist. :) > The good news is that using Gedcom.pm doesn't have to be slow. For > example, here is code that implements option 1 of partition.ll, that is > it will print out details of all people in each partition of the > database. It uses the same algorithm as partition.ll - in fact I > created it but cutting down the lines2perl translation. It runs quite > fast ;-) Wow! I called your script partition_option1.pl. It is QUICK! And it ends up with the same result as the LifeLines -- 4120 people in the primary partition of my GEDCOM, 19 junk partitions. Sweet...! >> Perhaps I'll install LifeLines and see if the original script works OK or >> not. > > Looks like it did in this case, but the relation script didn't. Did you > try the relation script natively? Here's my scorecard: relation.pl: Fast, but lied to me twice, reporting no relation between me and 2 of my relatives. relation.ll: Fast, and identified relations that the Perl version had me convinced didn't exist. partition_option1.ll: Fast. partition_option1.pl: Fast, exact same results. partition_option2.ll: Fast, split my GEDCOM for me. partition_option2.pl: SLOW, blew up. So since partition_option1.pl CAN correctly identify all the partitions very very quickly, there just must be something in the lines2perl translation process that makes the attempt of a GEDCOM output format unbearably slow in the .pl version... with an explosive finale! :) And I don't know what the deal is with relation.pl. I could try to debug it or write a test set for you that demonstrates the problem... I'm not sure I could ever tackle the underlying language translation patch(es) that would be needed... Do you ever "bless" tweaked Perl scripts as ports of the LL scripts, or do you always try to patch lines2perl? Thanks for all your help!!! j http://jays.net/genealogy From jay at jays.net Sun Apr 30 15:23:07 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 17:23:07 -0500 Subject: [Omaha.pm] lines2perl: partition.pl Message-ID: <445538CB.6010708@jays.net> Paul's response. j -------- Original Message -------- Subject: Re: lines2perl: partition.pl Date: Sun, 30 Apr 2006 23:35:20 +0200 From: Paul Johnson To: Jay Hannah On Sun, Apr 30, 2006 at 03:25:02PM -0500, Jay Hannah wrote: > Paul Johnson wrote: > >Argh - sorry about that. Yes, there are a few LifeLines functions which > >I haven't implemented - including all the functions since LifeLines got > >its new lease of life. > > Did LifeLines (almost?) die at some point? Are you trying to bridge the > work into the next generation through your Perl re-write? It'd be terrible > to lose all that amazing software to the sands of time... It's a little > scary all the LifeLines copyright notices end in the mid 90s. :) Yes, for a while there was no active LifeLines development. It was during this time that I wrote Gedcom.pm and I decided that all those LifeLines scripts were too useful to lose. That's the main reason I wrote lines2perl. Then the author, Tom Wetmore, later put the source under an MIT style licence and others started maintenance and further development. > Here's my scorecard: > > relation.pl: Fast, but lied to me twice, reporting no relation between me > and 2 of my relatives. > relation.ll: Fast, and identified relations that the Perl version had me > convinced didn't exist. This is the bit that mainly concerns me since, as you surmise, it probably indicates a bug in either lines2perl or Gedcom::LifeLines. It might take a bit of work to track down though. Of course, since having written Gedcom.pm I have also written Devel::Cover, so the proper approach here would be to increase the coverage of the test suite, and in so doing the bug should become apparent. > partition_option1.ll: Fast. > partition_option1.pl: Fast, exact same results. This just means that I have written the perl code well. Good to know, but doesn't take us too much further. > partition_option2.ll: Fast, split my GEDCOM for me. > partition_option2.pl: SLOW, blew up. I'm not too worried about the automatic translation being slow, as long as it is correct. It would be nice it it was fast, of course, and profiling might show up some obvious improvements, but for most reports I think the time is fine. And it blew up because of a missing function. Adding that should already be in the TODO. > So since partition_option1.pl CAN correctly identify all the partitions > very very quickly, there just must be something in the lines2perl > translation process that makes the attempt of a GEDCOM output format > unbearably slow in the .pl version... with an explosive finale! :) > > And I don't know what the deal is with relation.pl. I could try to debug it > or write a test set for you that demonstrates the problem... I'm not sure I > could ever tackle the underlying language translation patch(es) that would > be needed... Do you ever "bless" tweaked Perl scripts as ports of the LL > scripts, or do you always try to patch lines2perl? So far, I have just changed lines2perl and Gedcom::LifeLines. There seems little value in adding the automatically generated files to the distribution, but hand translated files, like the one I posted before, would be useful, both because of their utility and as examples of using Gedcom.pm. Someone recently suggested and examples directory be added to the distribution and I think that is a good idea. I'll add the partition translation to start that off. > Thanks for all your help!!! You're welcome. By the way, all my posts are rejected from Omaha.pm, so I hope the folks there don't mind a somewhat one sided discussion. -- Paul Johnson - paul at pjcj.net http://www.pjcj.net From jay at jays.net Sun Apr 30 15:32:46 2006 From: jay at jays.net (Jay Hannah) Date: Sun, 30 Apr 2006 17:32:46 -0500 Subject: [Omaha.pm] lines2perl: partition.pl In-Reply-To: <20060430213520.GR21543@pjcj.net> References: <4450B0CE.8010700@jays.net> <20060428232903.GH21543@pjcj.net> <4452A98F.5060301@jays.net> <20060429000634.GK21543@pjcj.net> <4453D5F4.3030701@jays.net> <4454D4EC.8000901@jays.net> <20060430173953.GN21543@pjcj.net> <20060430174625.GO21543@pjcj.net> <44551D1E.5070000@jays.net> <20060430213520.GR21543@pjcj.net> Message-ID: <44553B0E.6020805@jays.net> Paul Johnson wrote: >> relation.pl: Fast, but lied to me twice, reporting no relation between me >> and 2 of my relatives. >> relation.ll: Fast, and identified relations that the Perl version had me >> convinced didn't exist. > > This is the bit that mainly concerns me since, as you surmise, it > probably indicates a bug in either lines2perl or Gedcom::LifeLines. It > might take a bit of work to track down though. > > Of course, since having written Gedcom.pm I have also written > Devel::Cover, so the proper approach here would be to increase the > coverage of the test suite, and in so doing the bug should become > apparent. I'll try to isolate a test set demonstrating the problem one of these weekends soonish. Devel::Cover is pretty hardcore -- I'm not versed in mapping programming languages. I'm a Test::More guy, myself. :) > So far, I have just changed lines2perl and Gedcom::LifeLines. There > seems little value in adding the automatically generated files to the > distribution, but hand translated files, like the one I posted before, > would be useful, both because of their utility and as examples of using > Gedcom.pm. Someone recently suggested and examples directory be added > to the distribution and I think that is a good idea. I'll add the > partition translation to start that off. Yes, the more examples the better! I think search.cpan.org (for one) will tear open your CPAN distribution and HTML index all the POD it can find inside, so the examples will end up with their own homepages there. Exposure is good. > By the way, all my posts are rejected from Omaha.pm, so I hope the folks > there don't mind a somewhat one sided discussion. I've been posting them for you. Our very sleepy list needs the traffic. :) http://mail.pm.org/pipermail/omaha-pm/2006-April/thread.html Thanks, j From dave.nerd at gmail.com Sun Apr 30 15:41:14 2006 From: dave.nerd at gmail.com (Dave M) Date: Sun, 30 Apr 2006 17:41:14 -0500 Subject: [Omaha.pm] next meeting Message-ID: <9ac12b1c0604301541k57e28e34l9905b5ab7a7bf53c@mail.gmail.com> Hi all, The last post mentioned sleepy mailing list, so I'll waste space with this. :) I had time to kill this morning, so I took the "nextmtg" script (informs you of the next pm meeting) from the front page (http://omaha.pm.org/nextmtg_pl.txt) and turned it into a gui. Attached is also an rpm which should work with any Fedora/RH system. Note that you may have to install a few modules (Gtk2, Gnome2) if you're interested. It's not fully tested, but at least appears to work. It doesn't need Fedora, though - it can be run manually. Yes, I had some time on my hands this morning... :) This program reminded me that unfortunately I'll be out of town during the next meeting... dave -------------- next part -------------- A non-text attachment was scrubbed... Name: gnext-package.tar.gz Type: application/x-gzip Size: 19433 bytes Desc: not available Url : http://mail.pm.org/pipermail/omaha-pm/attachments/20060430/81ddd546/attachment-0001.gz