From cajun at cajuninc.com Sun Dec 1 00:17:26 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... Message-ID: <1038723446.18655.48.camel@moe> I told George of this script a couple of days ago. He thought it was a good practical use for Perl. My G/F is Jewish. She has a hard time remembering to light her candles on Fridays. I had an equally hard time remembering to remind her. Enter perl.... Again, I setup a cron job like so: 30 16 * * 5 /home/cajun/HOME/perl/candles/candles.pl Then a short Perl script to do the work. It sends a text message to her cell phone at 430pm on Fridays. It also sends the same reminder to me just so I know it worked. (I munged the phone numbers to protect the innocent): #!/usr/bin/perl -w use strict; use MIME::Lite; my @recipients = qw( 4155551212@mobile.mycingular.com 5105551212@mobile.mycingular.com ); my $wait_time = 900; # 900 seconds is 15 minutes my $debug = 0; my @messages = ( "It's Friday. It's candle day. Don't forget...", "It's going to be dark soon. Remember it is candle day...", "Last warning. Candle day..." ); my $total = @messages; my $index = 1; foreach (@messages){ &send_message($_); if ($debug) {print "Index is: $index\n"}; if ($index < $total){ if ($debug) {print "Sleeping $wait_time seconds\n"}; sleep $wait_time; $index++; } } sub send_message{ if ($debug) {print "Sending message: $_\n"}; my $msg = MIME::Lite->new( From =>'cajun@cajuninc.com', BCc =>"@recipients", Subject =>"", Type =>'TEXT', Data =>$_ ); $msg->send; } -- IBM: Inevitably Bad Marketing 10:10pm up 8 days, 21:49, 4 users, load average: 1.12, 1.15, 1.15 Linux Registered User #241685 http://counter.li.org From george at metaart.org Sun Dec 1 01:04:57 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <1038723446.18655.48.camel@moe> References: <1038723446.18655.48.camel@moe> Message-ID: <200211302304.57104.george@metaart.org> Mike, Any chance you'd give a lightning talk on this script? It could consist of: * something like you say in your post before the listing * followed by a friendly smile * followed by the words "Are there any questions?" or if you prefer to not answer questions followed by the words "Thank you." Or whatever. But it must be under 5 minutes or it's not a lightning talk. But the truth is you would likely not escape questions (and commentary too) because these would come at a break or after the meeting, if you do handle them right after the talk. Oh, well! --- George All, Anyone else want to (or willing to) give a lightning talk? Maximum: 5 minutes. Minumum: none. Really, as short as you want. --- George On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > I told George of this script a couple of days ago. He thought it was a > good practical use for Perl. > > My G/F is Jewish. She has a hard time remembering to light her candles > on Fridays. I had an equally hard time remembering to remind her. Enter > perl.... > > Again, I setup a cron job like so: > > 30 16 * * 5 /home/cajun/HOME/perl/candles/candles.pl > > Then a short Perl script to do the work. It sends a text message to her > cell phone at 430pm on Fridays. It also sends the same reminder to me > just so I know it worked. (I munged the phone numbers to protect the > innocent): > > #!/usr/bin/perl -w > use strict; > > use MIME::Lite; > > my @recipients = qw( 4155551212@mobile.mycingular.com > 5105551212@mobile.mycingular.com > ); > > my $wait_time = 900; # 900 seconds is 15 minutes > my $debug = 0; > > my @messages = ( > "It's Friday. It's candle day. Don't forget...", > "It's going to be dark soon. Remember it is candle day...", > "Last warning. Candle day..." > ); > > my $total = @messages; > my $index = 1; > > foreach (@messages){ > &send_message($_); > if ($debug) {print "Index is: $index\n"}; > if ($index < $total){ > if ($debug) {print "Sleeping $wait_time seconds\n"}; > sleep $wait_time; > $index++; > } > } > > sub send_message{ > if ($debug) {print "Sending message: $_\n"}; > my $msg = MIME::Lite->new( > From =>'cajun@cajuninc.com', > BCc =>"@recipients", > Subject =>"", > Type =>'TEXT', > Data =>$_ > ); > $msg->send; > } From cajun at cajuninc.com Sun Dec 1 01:18:20 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <200211302304.57104.george@metaart.org> References: <1038723446.18655.48.camel@moe> <200211302304.57104.george@metaart.org> Message-ID: <1038727100.18655.50.camel@moe> 5 minutes huh ? Sounds like a challenge. Maybe I should study it to figure out what I did just in case there is a question or two. Sure. M On Sat, 2002-11-30 at 23:04, George Woolley wrote: > Mike, > Any chance you'd give a lightning talk on this script? > It could consist of: > * something like you say in your post before > the listing > * followed by a friendly smile > * followed by the words "Are there any questions?" > or if you prefer to not answer questions > followed by the words "Thank you." > Or whatever. > But it must be under 5 minutes or it's not a lightning talk. > > But the truth is you would likely not escape questions > (and commentary too) > because these would come at a break or after the meeting, > if you do handle them right after the talk. > Oh, well! > --- George > > All, > Anyone else want to (or willing to) give a lightning talk? > Maximum: 5 minutes. > Minumum: none. Really, as short as you want. > --- George > > > On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > > I told George of this script a couple of days ago. He thought it was a > > good practical use for Perl. > > > > My G/F is Jewish. She has a hard time remembering to light her candles > > on Fridays. I had an equally hard time remembering to remind her. Enter > > perl.... > > > > Again, I setup a cron job like so: > > > > 30 16 * * 5 /home/cajun/HOME/perl/candles/candles.pl > > > > Then a short Perl script to do the work. It sends a text message to her > > cell phone at 430pm on Fridays. It also sends the same reminder to me > > just so I know it worked. (I munged the phone numbers to protect the > > innocent): > > > > #!/usr/bin/perl -w > > use strict; > > > > use MIME::Lite; > > > > my @recipients = qw( 4155551212@mobile.mycingular.com > > 5105551212@mobile.mycingular.com > > ); > > > > my $wait_time = 900; # 900 seconds is 15 minutes > > my $debug = 0; > > > > my @messages = ( > > "It's Friday. It's candle day. Don't forget...", > > "It's going to be dark soon. Remember it is candle day...", > > "Last warning. Candle day..." > > ); > > > > my $total = @messages; > > my $index = 1; > > > > foreach (@messages){ > > &send_message($_); > > if ($debug) {print "Index is: $index\n"}; > > if ($index < $total){ > > if ($debug) {print "Sleeping $wait_time seconds\n"}; > > sleep $wait_time; > > $index++; > > } > > } > > > > sub send_message{ > > if ($debug) {print "Sending message: $_\n"}; > > my $msg = MIME::Lite->new( > > From =>'cajun@cajuninc.com', > > BCc =>"@recipients", > > Subject =>"", > > Type =>'TEXT', > > Data =>$_ > > ); > > $msg->send; > > } > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Backup not found: A)bort, R)etry, M)assive heart failure? 11:15pm up 8 days, 22:54, 5 users, load average: 3.16, 1.67, 1.29 Linux Registered User #241685 http://counter.li.org From george at metaart.org Sun Dec 1 03:10:01 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <1038727100.18655.50.camel@moe> References: <1038723446.18655.48.camel@moe> <200211302304.57104.george@metaart.org> <1038727100.18655.50.camel@moe> Message-ID: <200212010110.01822.george@metaart.org> Mike, Kool! Thanks! --- George On Saturday 30 November 2002 11:18 pm, M. Lewis wrote: > 5 minutes huh ? Sounds like a challenge. Maybe I should study it to > figure out what I did just in case there is a question or two. > > Sure. > M > > On Sat, 2002-11-30 at 23:04, George Woolley wrote: > > Mike, > > Any chance you'd give a lightning talk on this script? > > ... under 5 minutes or it's not a lightning talk. ... > > --- George > > > > On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > > > ... script ... remembering to light her candles > > > ... sends a text message to her From cajun at cajuninc.com Sun Dec 1 03:17:21 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <200212010110.01822.george@metaart.org> References: <1038723446.18655.48.camel@moe> <200211302304.57104.george@metaart.org> <1038727100.18655.50.camel@moe> <200212010110.01822.george@metaart.org> Message-ID: <1038734241.1333.13.camel@moe> Uh George..... I'm curious why you want me to give a talk on this script ? It would seem to me it is so simple, most of the other folks could do it in their sleep.... M On Sun, 2002-12-01 at 01:10, George Woolley wrote: > Mike, > Kool! Thanks! > --- George > > On Saturday 30 November 2002 11:18 pm, M. Lewis wrote: > > 5 minutes huh ? Sounds like a challenge. Maybe I should study it to > > figure out what I did just in case there is a question or two. > > > > Sure. > > M > > > > On Sat, 2002-11-30 at 23:04, George Woolley wrote: > > > Mike, > > > Any chance you'd give a lightning talk on this script? > > > ... under 5 minutes or it's not a lightning talk. ... > > > --- George > > > > > > On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > > > > ... script ... remembering to light her candles > > > > ... sends a text message to her > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Old programmers never die; they just branch to a new address. 1:15am up 1:03, 5 users, load average: 0.05, 0.05, 0.00 Linux Registered User #241685 http://counter.li.org From george at metaart.org Sun Dec 1 13:39:13 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <1038734241.1333.13.camel@moe> References: <1038723446.18655.48.camel@moe> <200212010110.01822.george@metaart.org> <1038734241.1333.13.camel@moe> Message-ID: <200212011139.13986.george@metaart.org> Mike, Hm, put them to sleep. I suppose that would be a possibility. My thought is this. I imagine the talk itself will take about one minute. Some people may find this simple idea interesting. Some might find it amusing. (In my case, I find it both. And practical too.) If no one finds it engaging, likely there will be no questions. To me one of the beauty's of lightning talks is there is little risk for either the speaker or the audience. I also think that there may be more interest here than you think. I agree that the script is simple. But there may well be thoughts on the code anyway. Then there's what has to be set up on the mail side. I believe you'll have questions immediately or after the meeting. (I expect to have some.) And again even if noone finds the talk interesting, there's been little loss. I also think it's good to have as many people talking as possible. Then again, perhaps you have a lightning talk you'd prefer to give. --- George P.S. I greatly enjoy the idea of someone putting the group to sleep with a lightning talk. On Sunday 01 December 2002 1:17 am, M. Lewis wrote: > Uh George..... I'm curious why you want me to give a talk on this script > ? It would seem to me it is so simple, most of the other folks could do > it in their sleep.... > > M > > On Sun, 2002-12-01 at 01:10, George Woolley wrote: > > Mike, > > Kool! Thanks! > > --- George > > > > On Saturday 30 November 2002 11:18 pm, M. Lewis wrote: > > > 5 minutes huh ? Sounds like a challenge. Maybe I should study it to > > > figure out what I did just in case there is a question or two. > > > > > > Sure. > > > M > > > > > > On Sat, 2002-11-30 at 23:04, George Woolley wrote: > > > > Mike, > > > > Any chance you'd give a lightning talk on this script? > > > > ... under 5 minutes or it's not a lightning talk. ... > > > > --- George > > > > > > > > On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > > > > > ... script ... remembering to light her candles > > > > > ... sends a text message to her > > > > _______________________________________________ > > Oakland mailing list > > Oakland@mail.pm.org > > http://mail.pm.org/mailman/listinfo/oakland From cajun at cajuninc.com Sun Dec 1 21:03:27 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <200212011139.13986.george@metaart.org> References: <1038723446.18655.48.camel@moe> <200212010110.01822.george@metaart.org> <1038734241.1333.13.camel@moe> <200212011139.13986.george@metaart.org> Message-ID: <1038798207.1449.19.camel@moe> Okey dokey. You got it... M On Sun, 2002-12-01 at 11:39, George Woolley wrote: > Mike, > Hm, put them to sleep. I suppose that would be a possibility. > My thought is this. > I imagine the talk itself will take about one minute. > Some people may find this simple idea interesting. > Some might find it amusing. > (In my case, I find it both. And practical too.) > If no one finds it engaging, likely there will be no questions. > To me one of the beauty's of lightning talks is > there is little risk for either the speaker or the audience. > > I also think that there may be more interest > here than you think. > I agree that the script is simple. > But there may well be thoughts on the code anyway. > Then there's what has to be set up on the mail side. > I believe you'll have questions immediately or after the meeting. > (I expect to have some.) > And again even if noone finds the talk interesting, > there's been little loss. > > I also think it's good to have as many people talking as possible. > Then again, perhaps you have a lightning talk you'd prefer to give. > --- George > > P.S. I greatly enjoy the idea of someone > putting the group to sleep with a lightning talk. > > On Sunday 01 December 2002 1:17 am, M. Lewis wrote: > > Uh George..... I'm curious why you want me to give a talk on this script > > ? It would seem to me it is so simple, most of the other folks could do > > it in their sleep.... > > > > M > > > > On Sun, 2002-12-01 at 01:10, George Woolley wrote: > > > Mike, > > > Kool! Thanks! > > > --- George > > > > > > On Saturday 30 November 2002 11:18 pm, M. Lewis wrote: > > > > 5 minutes huh ? Sounds like a challenge. Maybe I should study it to > > > > figure out what I did just in case there is a question or two. > > > > > > > > Sure. > > > > M > > > > > > > > On Sat, 2002-11-30 at 23:04, George Woolley wrote: > > > > > Mike, > > > > > Any chance you'd give a lightning talk on this script? > > > > > ... under 5 minutes or it's not a lightning talk. ... > > > > > --- George > > > > > > > > > > On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > > > > > > ... script ... remembering to light her candles > > > > > > ... sends a text message to her > > > > > > _______________________________________________ > > > Oakland mailing list > > > Oakland@mail.pm.org > > > http://mail.pm.org/mailman/listinfo/oakland > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Hackers have kernel knowledge. 7:00pm up 18:48, 5 users, load average: 0.07, 0.05, 0.05 Linux Registered User #241685 http://counter.li.org From george at metaart.org Sun Dec 1 21:43:16 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Perl scripts..... In-Reply-To: <1038798207.1449.19.camel@moe> References: <1038723446.18655.48.camel@moe> <200212011139.13986.george@metaart.org> <1038798207.1449.19.camel@moe> Message-ID: <200212011943.16243.george@metaart.org> Mike, Great! And thanks for your question. -- George On Sunday 01 December 2002 7:03 pm, M. Lewis wrote: > Okey dokey. You got it... > > M > > On Sun, 2002-12-01 at 11:39, George Woolley wrote: > > Mike, > > Hm, put them to sleep. I suppose that would be a possibility. > > My thought is this. > > I imagine the talk itself will take about one minute. > > Some people may find this simple idea interesting. > > Some might find it amusing. > > (In my case, I find it both. And practical too.) > > If no one finds it engaging, likely there will be no questions. > > To me one of the beauty's of lightning talks is > > there is little risk for either the speaker or the audience. > > > > I also think that there may be more interest > > here than you think. > > I agree that the script is simple. > > But there may well be thoughts on the code anyway. > > Then there's what has to be set up on the mail side. > > I believe you'll have questions immediately or after the meeting. > > (I expect to have some.) > > And again even if noone finds the talk interesting, > > there's been little loss. > > > > I also think it's good to have as many people talking as possible. > > Then again, perhaps you have a lightning talk you'd prefer to give. > > --- George > > > > P.S. I greatly enjoy the idea of someone > > putting the group to sleep with a lightning talk. > > > > On Sunday 01 December 2002 1:17 am, M. Lewis wrote: > > > Uh George..... I'm curious why you want me to give a talk on this > > > script ? It would seem to me it is so simple, most of the other folks > > > could do it in their sleep.... > > > > > > M > > > > > > On Sun, 2002-12-01 at 01:10, George Woolley wrote: > > > > Mike, > > > > Kool! Thanks! > > > > --- George > > > > > > > > On Saturday 30 November 2002 11:18 pm, M. Lewis wrote: > > > > > 5 minutes huh ? Sounds like a challenge. Maybe I should study it to > > > > > figure out what I did just in case there is a question or two. > > > > > > > > > > Sure. > > > > > M > > > > > > > > > > On Sat, 2002-11-30 at 23:04, George Woolley wrote: > > > > > > Mike, > > > > > > Any chance you'd give a lightning talk on this script? > > > > > > ... under 5 minutes or it's not a lightning talk. ... > > > > > > --- George > > > > > > > > > > > > On Saturday 30 November 2002 10:17 pm, M. Lewis wrote: > > > > > > > ... script ... remembering to light her candles > > > > > > > ... sends a text message to her > > > > > > > > _______________________________________________ > > > > Oakland mailing list > > > > Oakland@mail.pm.org > > > > http://mail.pm.org/mailman/listinfo/oakland > > > > _______________________________________________ > > Oakland mailing list > > Oakland@mail.pm.org > > http://mail.pm.org/mailman/listinfo/oakland From cajun at cajuninc.com Mon Dec 2 02:43:42 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Signatures..... Message-ID: <1038818622.1449.41.camel@moe> When I posted the script to rotate your signatures and wrote the part about building a file of your favorite signatures, some of you might have an easy way to gather signatures for this file. I belong to several mailing lists. A good portion of those mailing lists, the posters have signatures. Some of them are even cool. Those running Linux have an easy way to gather these signatures. Here's a short script I wrote to parse my 245MB maillist file (it's really only one list) and generate a smaller file with just the signature portion, if it exists, of each message. #!/usr/bin/perl -w use strict; my $infile="./Red-Hat List"; my $outfile="./signatures"; my $sigfound=0; open(INFILE,"$infile") or die "Can't open $infile :$!"; open(OUTFILE,">$outfile") or die "Sorry, but I can't write to $outfile :$!"; while(){ if (/^--\s+$/){ $sigfound++; next; } if ($sigfound){ if (/^\s+PLEASE read the Re/){ $sigfound=0; next; } if ($sigfound<5){ print OUTFILE; $sigfound++; if ($sigfound==5){ print OUTFILE "-"x70; print OUTFILE "\n"; $sigfound=0; } } } } -- If a program is useful, it must be changed. 12:35am up 1 day, 23 min, 5 users, load average: 0.10, 0.08, 0.02 Linux Registered User #241685 http://counter.li.org From blyman at iii.com Mon Dec 2 11:55:10 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Mini-sig-beer-oakland? References: <20021127211226.A17612@new.gerasimov.net> Message-ID: <3DEB9E7E.9000708@iii.com> David Alban wrote: > Greetings! > Salutations! > With all this talk of beer, I was wondering if anyone would be > interested in getting together sometime next week for a > mini-sig-beer-oakland event. mini-sig-beer-east-bay, even! > > Maybe at 7:00 or 8:00 pm? Maybe the > 3rd, 4th, 6th, or 7th? Yeah, I know the next meeting is on the 10th, > but I might need some down time that week because of other > obligations. :-( > > I would suggest Jupiter in Berkeley[1] unless someone would like to > suggest a place in Oakland with as fine a selection of brewed > beverages. > Jupiter sounds good to me, as do the days and times (I'm free any of those nights). iirc Jupiter is along Shattuck...? Anyone else interested? Belden From blyman at iii.com Mon Dec 2 12:03:49 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Introduction References: <200211242115.53461.georgepw@metaart.org> <20021127214340.A17648@new.gerasimov.net> Message-ID: <3DEBA085.5020209@iii.com> David Alban wrote: > > >> * ask a question about Perl >> > > What are all of those funny punctuation marks for? > Asked and answered: http://perl.plover.com/IAQ/IAQlist.html#what%20are%20all%20those%20$@%25*%20signs%20for > >> * make a suggestion about the group >> > > Could someone do a presentation that is an introduction to object > oriented perl programming? > Sure, I'll give it a go. > >> * do something else >> David, George was actually looking for "stupid human tricks" here. Your suggestion is neither stupid, nor a trick. Send us a photo of you standing on your head, and then we'll talk. :) Belden From extasia at mindspring.com Mon Dec 2 13:21:03 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Mini-sig-beer-east-bay? In-Reply-To: <3DEB9E7E.9000708@iii.com>; from blyman@iii.com on Mon, Dec 02, 2002 at 09:55:10AM -0800 References: <20021127211226.A17612@new.gerasimov.net> <3DEB9E7E.9000708@iii.com> Message-ID: <20021202112103.A20678@new.gerasimov.net> Greetings! At 2002/12/02/09:55 -0800 Belden Lyman wrote: > mini-sig-beer-east-bay, even! Works for me. > Jupiter sounds good to me, as do the days and times (I'm free > any of those nights). iirc Jupiter is along Shattuck...? Jupiter is on the corner of Shattuck and Allston. *Amazing* beers. > Anyone else interested? The 7th has become unavailable for me. That leaves Tuesday, Wednesday, and Friday, the 3rd, 4th, and 6th, available. Since Belden and I can make all of those dates, maybe someone else could narrow down a date (by attending, of course). Any takers? Maybe the "takers" could also indicate whether 7:00 or 8:00 is better. David -- Live in a world of your own, but always welcome visitors. *** Join us at sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021202/e896f7da/attachment.bin From extasia at mindspring.com Mon Dec 2 13:24:13 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Introduction In-Reply-To: <3DEBA085.5020209@iii.com>; from blyman@iii.com on Mon, Dec 02, 2002 at 10:03:49AM -0800 References: <200211242115.53461.georgepw@metaart.org> <20021127214340.A17648@new.gerasimov.net> <3DEBA085.5020209@iii.com> Message-ID: <20021202112413.B20678@new.gerasimov.net> Belden, At 2002/12/02/10:03 -0800 Belden Lyman wrote: > David, George was actually looking for "stupid human tricks" here. > Your suggestion is neither stupid, nor a trick. Send us a photo of > you standing on your head, and then we'll talk. :) When I wrote my suggestion I was wearing a Mary Poppins outfit, standing on my head and reciting the libretto for Joe's Garage. You just couldn't see me, so you didn't know. David -- Live in a world of your own, but always welcome visitors. *** Join us at sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021202/17ab2f42/attachment.bin From george at metaart.org Mon Dec 2 13:26:44 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Punctuation, How to Post In-Reply-To: <3DEBA085.5020209@iii.com> References: <200211242115.53461.georgepw@metaart.org> <20021127214340.A17648@new.gerasimov.net> <3DEBA085.5020209@iii.com> Message-ID: <200212021126.44566.george@metaart.org> Well, this thing about funny punctuation marks might result in some kool short lightning talks. With this thought in mind, I decided to checkout what there was on this subject on the net, but ... I got distracted by a list of suggestions for improving your posts: http://www.action-electronics.com/fun/fun5.htm My favorite here is: 45. Accuse other posters of being AI experiments, Perl scripts, or Emacs macros. Hm, could Belden, perhaps, be a fiendishly sophisticated Perl script written for some nefarious purpose by whom? Himself? Nah, probably not. After all, he appeared at the first meeting. --- George On Monday 02 December 2002 10:03 am, Belden Lyman wrote: > David Alban wrote: > >> * ask a question about Perl > > > > What are all of those funny punctuation marks for? > > Asked and answered: ... From extasia at mindspring.com Mon Dec 2 13:52:20 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Punctuation, How to Post In-Reply-To: <200212021126.44566.george@metaart.org>; from george@metaart.org on Mon, Dec 02, 2002 at 11:26:44AM -0800 References: <200211242115.53461.georgepw@metaart.org> <20021127214340.A17648@new.gerasimov.net> <3DEBA085.5020209@iii.com> <200212021126.44566.george@metaart.org> Message-ID: <20021202115220.E20678@new.gerasimov.net> At 2002/12/02/11:26 -0800 George Woolley wrote: > Well, this thing about funny punctuation marks > might result in some kool short lightning talks. Uh, time to nip this thing in the bud... I was kidding when I asked about the "funny puncuation marks". Everybody knows that $scalars are worth more money than @arrays and %hashes... :-) P.S. Pay no attention to the AI behind the keyboard... -- Live in a world of your own, but always welcome visitors. *** Join us at sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021202/6fb23dcb/attachment.bin From cajun at cajuninc.com Mon Dec 2 14:18:03 2002 From: cajun at cajuninc.com (cajun@cajuninc.com) Date: Mon Aug 2 21:33:24 2004 Subject: [oak perl] Mini-sig-beer-east-bay? In-Reply-To: <20021202112103.A20678@new.gerasimov.net> References: <20021127211226.A17612@new.gerasimov.net> <3DEB9E7E.9000708@iii.com> <20021202112103.A20678@new.gerasimov.net> Message-ID: <1038860283.3debbffb4459a@rattler.cajuninc.com> Make it Tues or Wed and count me in. 730 - 800pm is fine with me. M Quoting David Alban : > Greetings! > > At 2002/12/02/09:55 -0800 Belden Lyman wrote: > > mini-sig-beer-east-bay, even! > > Works for me. > > > Jupiter sounds good to me, as do the days and times (I'm free > > any of those nights). iirc Jupiter is along Shattuck...? > > Jupiter is on the corner of Shattuck and Allston. *Amazing* beers. > > > Anyone else interested? > > The 7th has become unavailable for me. That leaves Tuesday, Wednesday, > and Friday, the 3rd, 4th, and 6th, available. > > Since Belden and I can make all of those dates, maybe someone else could > narrow down a date (by attending, of course). > > Any takers? Maybe the "takers" could also indicate whether 7:00 or 8:00 > is better. > > David > -- > Live in a world of your own, but always welcome visitors. > *** > Join us at sig-beer-west! > http://www.gerasimov.net/~alban/sig.beer.west.html > Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html > ------------------------------------------------- This mail sent through IMP: http://horde.org/imp/ From extasia at mindspring.com Mon Dec 2 14:47:26 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Mini-sig-beer-east-bay? In-Reply-To: <1038860283.3debbffb4459a@rattler.cajuninc.com>; from cajun@cajuninc.com on Mon, Dec 02, 2002 at 12:18:03PM -0800 References: <20021127211226.A17612@new.gerasimov.net> <3DEB9E7E.9000708@iii.com> <20021202112103.A20678@new.gerasimov.net> <1038860283.3debbffb4459a@rattler.cajuninc.com> Message-ID: <20021202124726.B21757@new.gerasimov.net> Greetings! At 2002/12/02/12:18 -0800 cajun@cajuninc.com wrote: > Make it Tues or Wed and count me in. > > 730 - 800pm is fine with me. O.K. Let's make it this Wednesday, 7:30pm, at Jupiter (corner of Shattuck and Allston in Berkeley). Cool. I'll post this to the sfpug list, too. For Wednesday night, I'll wear a navy blue t shirt with horizontal white pin stripes, so that you can identify me. David P.S. I have a standing rehearsal Monday nights in Berkeley. I'm usually at Jupiter afterwards. I usually arrive at Jupiter between 10:00 and 10:30. I usually sit at the bar. I have long curly, dirty blond hair (tied back) and a starter beard.[1] I'll be there tonight. If anyone happens to be in the neighborhood, drop by and introduce yourself. [1] Recently I shaved my beard of several years and immediately said "This sucks!!" so I'm growing it back. :-) -- Live in a world of your own, but always welcome visitors. *** Join us at sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021202/88398aae/attachment.bin From cajun at cajuninc.com Mon Dec 2 14:58:29 2002 From: cajun at cajuninc.com (cajun@cajuninc.com) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Mini-sig-beer-east-bay? In-Reply-To: <20021202124726.B21757@new.gerasimov.net> References: <20021127211226.A17612@new.gerasimov.net> <3DEB9E7E.9000708@iii.com> <20021202112103.A20678@new.gerasimov.net> <1038860283.3debbffb4459a@rattler.cajuninc.com> <20021202124726.B21757@new.gerasimov.net> Message-ID: <1038862709.3debc975e033d@rattler.cajuninc.com> I can tell David.... you're WAY TOO ORGANIZED !!! I don't know what shirt I'm gonna wear tomorrow, much less the following day. M Quoting David Alban : > Greetings! > > At 2002/12/02/12:18 -0800 cajun@cajuninc.com wrote: > > Make it Tues or Wed and count me in. > > > > 730 - 800pm is fine with me. > > O.K. Let's make it this Wednesday, 7:30pm, at Jupiter (corner of > Shattuck and Allston in Berkeley). Cool. I'll post this to the > sfpug list, too. For Wednesday night, I'll wear a navy blue t shirt > with horizontal white pin stripes, so that you can identify me. > > David > > P.S. I have a standing rehearsal Monday nights in Berkeley. I'm > usually at Jupiter afterwards. I usually arrive at Jupiter > between 10:00 and 10:30. I usually sit at the bar. I have > long curly, dirty blond hair (tied back) and a starter > beard.[1] I'll be there tonight. If anyone happens to be in > the neighborhood, drop by and introduce yourself. > > [1] Recently I shaved my beard of several years and immediately said > "This sucks!!" so I'm growing it back. :-) > -- > Live in a world of your own, but always welcome visitors. > *** > Join us at sig-beer-west! > http://www.gerasimov.net/~alban/sig.beer.west.html > Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html > ------------------------------------------------- This mail sent through IMP: http://horde.org/imp/ From george at metaart.org Mon Dec 2 17:01:47 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Punctuation, How to Post In-Reply-To: <20021202115220.E20678@new.gerasimov.net> References: <200211242115.53461.georgepw@metaart.org> <200212021126.44566.george@metaart.org> <20021202115220.E20678@new.gerasimov.net> Message-ID: <200212021501.47270.george@metaart.org> On Monday 02 December 2002 11:52 am, David Alban wrote: > At 2002/12/02/11:26 -0800 George Woolley wrote: > > Well, this thing about funny punctuation marks > > might result in some kool short lightning talks. > > > > Uh, time to nip this thing in the bud... > > I was kidding when I asked about the "funny puncuation marks". > > > > Everybody knows that $scalars are worth more money than @arrays and > %hashes... :-) > > P.S. Pay no attention to the AI behind the keyboard... It's too late to nip it in the bud. They are everywhere. They have gotten into my regular expressions big time. Aaaa. Get out out of here. It's too late! .... == Give up, miserable Earthlings! == ALL YOUR BASE ARE BELONG TO US! -- From george at metaart.org Mon Dec 2 20:51:09 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl Basics Mailing List Message-ID: <200212021851.09429.george@metaart.org> reference "Perl Ambassadors" post at http://perlmonks.thepen.com/74314.html All, and Mike especially, The post referred to above contains discussion of matters that are highly relevant to the Perl Basics Mailing List set up by Mike Lewis. --- George From cajun at cajuninc.com Mon Dec 2 21:23:52 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl Basics Mailing List In-Reply-To: <200212021851.09429.george@metaart.org> References: <200212021851.09429.george@metaart.org> Message-ID: <1038885832.13720.1.camel@moe> Yes, this was one of the better postings. www.perlmonks.org is an excellent source of information. It is free to join if you like. But joining is not a requirement. You'll find me there as 'cajun'. Mike On Mon, 2002-12-02 at 18:51, George Woolley wrote: > reference "Perl Ambassadors" post at http://perlmonks.thepen.com/74314.html > > All, and Mike especially, > The post referred to above contains discussion of matters > that are highly relevant to the Perl Basics Mailing List > set up by Mike Lewis. > --- George > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- BREAKFAST.COM halted... cereal port not responding! 7:20pm up 1 day, 19:08, 5 users, load average: 0.11, 0.05, 0.01 Linux Registered User #241685 http://counter.li.org From george at metaart.org Mon Dec 2 22:34:46 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl Basics Mailing List In-Reply-To: <1038885832.13720.1.camel@moe> References: <200212021851.09429.george@metaart.org> <1038885832.13720.1.camel@moe> Message-ID: <200212022034.46791.george@metaart.org> Yes, it's especially useful for getting across why the Basic Perl Mailing List. Do you have links to other good posts on this subject? Eventually it would be good to have a web page on that. Hm, do you think we might be able to get Casey West and/or turnstep involved in some way? -- George On Monday 02 December 2002 7:23 pm, M. Lewis wrote: > Yes, this was one of the better postings. ... > > On Mon, 2002-12-02 at 18:51, George Woolley wrote: > > reference "Perl Ambassadors" post at > > http://perlmonks.thepen.com/74314.html ... > > --- George > > _______________________________________________ > > Oakland mailing list > > Oakland@mail.pm.org > > http://mail.pm.org/mailman/listinfo/oakland From george at metaart.org Mon Dec 2 22:42:29 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [oak perl] In-Reply-To: <1038885832.13720.1.camel@moe> References: <200212021851.09429.george@metaart.org> <1038885832.13720.1.camel@moe> Message-ID: <200212022042.29534.george@metaart.org> I've visited a couple of times, but have not been moved to join so far. Interesting, just moments ago, I got an email from the CostaRica.pm group leader, asking me if I was in permonks.org and telling me his name there. I do enjoy the meshing of "real life" and role playing. So far I've been more drawn to very free forms of role playing. See http://www.metaart.org/role You didn't tell me you were an Abbot. Impressive! An Abbot and an Ambassador. An intriguing combination. -- George On Monday 02 December 2002 7:23 pm, M. Lewis wrote: > ... www.perlmonks.org is an excellent source of information. It is free to > join if you like. But joining is not a requirement. You'll find me there > as 'cajun'. > Mike > > On Mon, 2002-12-02 at 18:51, George Woolley wrote: > > reference "Perl Ambassadors" post at > > http://perlmonks.thepen.com/74314.html ... > > --- George From cajun at cajuninc.com Mon Dec 2 23:31:08 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl Basics Mailing List In-Reply-To: <200212022034.46791.george@metaart.org> References: <200212021851.09429.george@metaart.org> <1038885832.13720.1.camel@moe> <200212022034.46791.george@metaart.org> Message-ID: <1038893468.13720.7.camel@moe> No, I don't know of any other links. Try a super search on perlmonks. That may yeild something. I just remember the discussion you mentioned. Sure, anything is possible. I don't know either one of them though. There are several monks in the Bezerkeley / Oakland area. I don't remember them by name. Somewhere there is a link on Perlmonks to a map of all the Monks locations. M On Mon, 2002-12-02 at 20:34, George Woolley wrote: > Yes, it's especially useful for getting across > why the Basic Perl Mailing List. > Do you have links to other good posts on this subject? > Eventually it would be good to have a web page on that. > > Hm, do you think we might be able to get Casey West and/or turnstep > involved in some way? > -- George > > On Monday 02 December 2002 7:23 pm, M. Lewis wrote: > > Yes, this was one of the better postings. ... > > > > On Mon, 2002-12-02 at 18:51, George Woolley wrote: > > > reference "Perl Ambassadors" post at > > > http://perlmonks.thepen.com/74314.html ... > > > --- George > > > _______________________________________________ > > > Oakland mailing list > > > Oakland@mail.pm.org > > > http://mail.pm.org/mailman/listinfo/oakland > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Do you like me for my brain or my baud? 9:25pm up 1 day, 21:13, 5 users, load average: 0.47, 0.18, 0.06 Linux Registered User #241685 http://counter.li.org From cajun at cajuninc.com Mon Dec 2 23:33:34 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [oak perl] In-Reply-To: <200212022042.29534.george@metaart.org> References: <200212021851.09429.george@metaart.org> <1038885832.13720.1.camel@moe> <200212022042.29534.george@metaart.org> Message-ID: <1038893614.13721.11.camel@moe> Yes, Perlmonks is pretty widespread. I don't know the total number of active Monks there. But I can tell you for sure there are a LOT of very knowledgeable folks there. Randal Scwartz is a very active member. He is known as Merlyn. M On Mon, 2002-12-02 at 20:42, George Woolley wrote: > I've visited a couple of times, but have not been moved to join so far. > Interesting, just moments ago, > I got an email from the CostaRica.pm group leader, > asking me if I was in permonks.org and telling me his name there. > > I do enjoy the meshing of "real life" and role playing. > So far I've been more drawn to very free forms of role playing. > See http://www.metaart.org/role > > You didn't tell me you were an Abbot. Impressive! > An Abbot and an Ambassador. An intriguing combination. > -- George > > On Monday 02 December 2002 7:23 pm, M. Lewis wrote: > > ... www.perlmonks.org is an excellent source of information. It is free to > > join if you like. But joining is not a requirement. You'll find me there > > as 'cajun'. > > Mike > > > > On Mon, 2002-12-02 at 18:51, George Woolley wrote: > > > reference "Perl Ambassadors" post at > > > http://perlmonks.thepen.com/74314.html ... > > > --- George > > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- God is REAL, unless explicitly declared INTEGER. 9:30pm up 1 day, 21:18, 5 users, load average: 0.13, 0.23, 0.11 Linux Registered User #241685 http://counter.li.org From george at metaart.org Tue Dec 3 00:27:27 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: Fwd: Re: [oak perl] > perlmonks.org Message-ID: <200212022227.27032.george@metaart.org> All, Sorry about the lack of useful title on the earlier message. -- George Mike, May I give your name on perlmonks.org to the CostaRica.pm group leader. I have asked an analogous question of him. Is the any common practice about how such names are handled that might be useful to know? --- George ---------- Forwarded Message ---------- Subject: Re: [oak perl] Date: Mon, 2 Dec 2002 20:42:29 -0800 From: George Woolley To: oakland@mail.pm.org I've visited a couple of times, but have not been moved to join so far. Interesting, just moments ago, I got an email from the CostaRica.pm group leader, asking me if I was in permonks.org and telling me his name there. I do enjoy the meshing of "real life" and role playing. So far I've been more drawn to very free forms of role playing. See http://www.metaart.org/role You didn't tell me you were an Abbot. Impressive! An Abbot and an Ambassador. An intriguing combination. -- George On Monday 02 December 2002 7:23 pm, M. Lewis wrote: > ... www.perlmonks.org is an excellent source of information. It is free to > join if you like. But joining is not a requirement. You'll find me there > as 'cajun'. > Mike > > On Mon, 2002-12-02 at 18:51, George Woolley wrote: > > reference "Perl Ambassadors" post at > > http://perlmonks.thepen.com/74314.html ... > > --- George ------------------------------------------------------- From george at metaart.org Tue Dec 3 00:44:46 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Ambassador Reports: Central America, New Zealand Message-ID: <200212022244.46196.george@metaart.org> Central America -------------------- Perl Mongers lists only one Central American group, i.e. CostaRica.pm. The group is in the early stages of developing. The group leader, Ronnie Afaro has kindly offered to explore whether there are other Perl groups in Central America (perhaps which did not register with Perl Mongers). Ronnie and I have agreed to do what we can to help each other's groups out. I've had discussions with him on many subjects, most notably the CostaRica.pm web site which has evolved in a most interesting and amusing way. See http://costarica.pm.org The group leader suggested that he could provide such things as email space and a mailing list for us, if we needed them at some point. New Zealand ---------------- Perl Mongers lists two groups in New Zealand, i.e. HawkesBay.pm and Wellington.pm. The HawkesBay.pm is in the early stages of development. The Wellington.pm was active in the past, became inactive and now may be reviving. I've been in contact with HawkesBay.pm group leader, Daniel Hopkirk, for some time. We've communicated about his site, getting his mailing list functional and getting cgis to work on his site. I believe I've been some small help in each of these areas. I was the first person to post on his mailing list. -- George From cajun at cajuninc.com Tue Dec 3 00:51:32 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: Fwd: Re: [oak perl] > perlmonks.org In-Reply-To: <200212022227.27032.george@metaart.org> References: <200212022227.27032.george@metaart.org> Message-ID: <1038898292.13720.16.camel@moe> Sure, you may give it to him or anyone else. Not to my knowledge. Names are just 'handles' that people pick. I don't think there is any cross reference or anything of 'handles' to real names. M On Mon, 2002-12-02 at 22:27, George Woolley wrote: > All, Sorry about the lack of useful title on the earlier message. -- George > > Mike, > May I give your name on perlmonks.org to the CostaRica.pm group leader. > I have asked an analogous question of him. > Is the any common practice about how such names are handled > that might be useful to know? > --- George > > ---------- Forwarded Message ---------- > Subject: Re: [oak perl] > Date: Mon, 2 Dec 2002 20:42:29 -0800 > From: George Woolley > To: oakland@mail.pm.org > > I've visited a couple of times, but have not been moved to join so far. > Interesting, just moments ago, > I got an email from the CostaRica.pm group leader, > asking me if I was in permonks.org and telling me his name there. > > I do enjoy the meshing of "real life" and role playing. > So far I've been more drawn to very free forms of role playing. > See http://www.metaart.org/role > > You didn't tell me you were an Abbot. Impressive! > An Abbot and an Ambassador. An intriguing combination. > -- George > > On Monday 02 December 2002 7:23 pm, M. Lewis wrote: > > ... www.perlmonks.org is an excellent source of information. It is free to > > join if you like. But joining is not a requirement. You'll find me there > > as 'cajun'. > > Mike > > > > On Mon, 2002-12-02 at 18:51, George Woolley wrote: > > > reference "Perl Ambassadors" post at > > > http://perlmonks.thepen.com/74314.html ... > > > --- George > > ------------------------------------------------------- > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- State-of-the-art: What we could do with enough money. 10:45pm up 1 day, 22:33, 5 users, load average: 0.12, 0.04, 0.01 Linux Registered User #241685 http://counter.li.org From blyman at iii.com Tue Dec 3 11:30:59 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] wish/suggestion for learning References: <3DE7DD16.7040706@e-tudes.net> Message-ID: <3DECEA53.8010202@iii.com> Hi Jennifer, On the general topic of "what modules are people using" (though not for web stuff), see http://www.perladvent.org/2002/ Belden From extasia at mindspring.com Tue Dec 3 12:02:15 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Mini-sig-beer-east-bay? In-Reply-To: <1038862709.3debc975e033d@rattler.cajuninc.com>; from cajun@cajuninc.com on Mon, Dec 02, 2002 at 12:58:29PM -0800 References: <20021127211226.A17612@new.gerasimov.net> <3DEB9E7E.9000708@iii.com> <20021202112103.A20678@new.gerasimov.net> <1038860283.3debbffb4459a@rattler.cajuninc.com> <20021202124726.B21757@new.gerasimov.net> <1038862709.3debc975e033d@rattler.cajuninc.com> Message-ID: <20021203100215.A28815@new.gerasimov.net> At 2002/12/02/12:58 -0800 cajun@cajuninc.com wrote: > I can tell David.... you're WAY TOO ORGANIZED !!! I don't know what shirt I'm > gonna wear tomorrow, much less the following day. My Mary Poppins outfit is at the cleaners... -- Live in a world of your own, but always welcome visitors. *** Join us at sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021203/8da26671/attachment.bin From george at metaart.org Tue Dec 3 16:59:25 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [PBML] Perl books > OO talk? In-Reply-To: References: Message-ID: <200212031459.25862.george@metaart.org> ================================== Aside: You may not know what PBML is. That's the Perl Basics Mailing List where this thread originated. ================================== Hm, can anyone suggest a title for a talk on what Mike finds interesting in OO? If we had someone knowlegable about OO speaking on that, would you be interested? Personally, I think such a person would inevitably say some interesting things about OO development in Perl. And let's assume an open question period. My questions are not academic. There is a fellow who has agreed to speak to us and one of the four topics he proposed was OO Perl. I could propose to him a more limited talk on OO, if someone would provide a name for it. But are there a number of people who'd find that a good topic? (Oh, did I mention he's both knowledgable and an interesting speaker.) Answers? Counter-proposals? Comments? By the way, I'd be interested. On Tuesday 03 December 2002 1:26 pm, Mike Lewis wrote: > OK, thanks for the pointers. My only interest at this time in learning > about OO would be to be able to use modules others have written. > > As George and I spoke on the phone a few days ago, I have a problem > understanding some of the terms that are used in man pages, and some of the > perldocs. For instance when you spoke of modulus. I'm like "Huh ?" > > Cool on blyman ! I figured you must be when you tossed out names like Ovid > and Pinyan. > > > > -----Original Message----- > From: Belden Lyman [mailto:blyman@iii.com] > Sent: Tuesday, December 03, 2002 1:23 PM > To: pbml@cajuninc.com > Subject: Re: [PBML] Perl books > > Mike Lewis wrote: > > Oh, I forgot about Object Oriented Perl. Maybe because it so far over my > > head. > > heh, it took me 2 years (count 'em!) to understand wtf perltoot, > perlobj, and perlbot were talking about - and then I discovered > perlboot. Give that a glance if you haven't yet: it helped me a > lot. > > > Belden, are you a member of Perlmonks ? > > Yep -> blyman > > Belden > > > _______________________________________________ > PBML mailing list > PBML@cajuninc.com > http://rattler.cajuninc.com/mailman/listinfo/pbml > > unsubscribe mailto:pbml-request@cajuninc.com?subject=unsubscribe > _______________________________________________ > PBML mailing list > PBML@cajuninc.com > http://rattler.cajuninc.com/mailman/listinfo/pbml > > unsubscribe mailto:pbml-request@cajuninc.com?subject=unsubscribe From blyman at iii.com Tue Dec 3 18:13:13 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [PBML] Perl books > OO talk? References: <200212031459.25862.george@metaart.org> Message-ID: <3DED4899.4070804@iii.com> George Woolley wrote: > > Hm, can anyone suggest a title for a talk > on what Mike finds interesting in OO? > "Using OO Modules". Originally when OO came up on this list as an arena for group talks, I assumed that the bent of the talk would be "Writing OO Modules", or "Understanding Perl Objects". > > If we had someone knowlegable about OO > speaking on that, would you be interested? > Speaking on "Using OO Modules" ? Not really: at the user level, the difference between a module with an OO interface and a module with a functional interface is pretty small. I'd have fun presenting code that has both an OO and functional interface, and show programs that use either interface. (See my first suggestion, at the end) > Personally, I think such a person would inevitably > say some interesting things about OO development in Perl. > And let's assume an open question period. > By "interesting things about OO development in Perl", do you mean: (a) interesting things relating to how Perl's OO was developed into the language itself, or (b) interesting things relating to developing one's own OO modules. > > My questions are not academic. > Neither are my answers :) > > There is a fellow who has agreed to speak to us > and one of the four topics he proposed was OO Perl. > But what did he propose: "Using OO Modules", "Writing Your Own OO Modules", or "Understanding Perl Objects" ? Generally when I hear people say they want to hear about OO Perl, I think they mean one of the latter two talks. Find out what he's suggesting. Mike might be wanting something different. > > I could propose to him a more limited talk on OO, > if someone would provide a name for it. Suggested above. > > But are there a number of people who'd find that a good topic? > Answers? Counter-proposals? Comments? > I'm willing to talk about: "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" "Writing OO Modules for Fun and Profit: Let Objects Transform Your CVS" "Understanding Perl Objects: Simple Data Becomes an Object of Desire!!" I actually have no clue what the difference is between the second and third talks (8o Belden From george at metaart.org Wed Dec 4 00:12:08 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] What Talk Subject? In-Reply-To: <3DED4899.4070804@iii.com> References: <200212031459.25862.george@metaart.org> <3DED4899.4070804@iii.com> Message-ID: <200212032212.08868.george@metaart.org> I asked Dan Meriwether (see http://www.delux.com) if he would be willing to give our group a talk. He said he would be glad to and suggested that he > could talk on data munging (esp. HTML), writing web agents with LWP, > Object Oriented perl, or, if not off-topic, defending a domain in a UDRP > suit (http://www.delux.com/UDRP/) or some other such. Personally, I'd be quite happy with any of the of above topics. Actually, with Dan I'd probably be OK with almost any topic. I said I'd get some feedback from our group. Based on limited knowledge of the people in our group my initial thoughts are: 1) data munging (esp. HTML) - not good with focus on HTML because more than one person in our group is not interested in HTML. but if focused elsewhere, might be a good topic. 2) writing agents with LWP - good topic 3) OO perl - good topic, but too broad but when narrowing it, could be tricky to include everyone maybe Using and Writing OO Modules would work 4) defending a domain - not good because, as he suggests, it's off-topic Your thoughts are welcomed and requested. Help! I'm not attached to the above, but it does reflect, roughly, my current awareness of the group. So do let me and us know what you think. -- George From david at fetter.org Wed Dec 4 00:29:09 2002 From: david at fetter.org (David Fetter) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] What Talk Subject? In-Reply-To: <200212032212.08868.george@metaart.org> References: <200212031459.25862.george@metaart.org> <3DED4899.4070804@iii.com> <200212032212.08868.george@metaart.org> Message-ID: <20021204062909.GE26996@fetter.org> On Tue, Dec 03, 2002 at 10:12:08PM -0800, George Woolley wrote: > > I asked Dan Meriwether (see http://www.delux.com) if he would be > > willing to give our group a talk. He said he would be glad to and > > suggested that he could talk on data munging (esp. HTML), writing > > web agents with LWP, Object Oriented perl, or, if not off-topic, > > defending a domain in a UDRP suit (http://www.delux.com/UDRP/) or > > some other such. > Personally, I'd be quite happy with any of the of above topics. > Actually, with Dan I'd probably be OK with almost any topic. > I said I'd get some feedback from our group. > Based on limited knowledge of the people in our group my initial thoughts are: > 1) data munging (esp. HTML) - not good with focus on HTML > because more than one person in our group is not interested in HTML. > but if focused elsewhere, might be a good topic. > 2) writing agents with LWP - good topic > 3) OO perl - good topic, but too broad > but when narrowing it, could be tricky to include everyone > maybe Using and Writing OO Modules would work > 4) defending a domain - not good > because, as he suggests, it's off-topic Dave Fetter here--some of you know me from SF perl mongers, which I helped found. I'd say the whole "it's off-topic" thing is a bit overblown. The whole "there's more than one way to do it" spirit kinda implies that we'd be working in things other than perl code like HTML, agents which often talk to non-perl things like the standard web and ftp servers, OO, which is originally a highly non-perl thing, domains, databases (relational and others), etc., etc. Perl is about doing what needs doing and not getting hung up on the small sh^Htuff. :) Any topic's good, keeping it loose and happy :) Just my $.01 (that ^#%$&^^#$#@ job market's cut a lot of budgets lately, y'know) Cheers, D -- David Fetter david@fetter.org http://fetter.org/~shackle/ phone: +1 510 893 6100 cell: +1 415 235 3778 From cajun at cajuninc.com Wed Dec 4 00:36:28 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] What Talk Subject? In-Reply-To: <200212032212.08868.george@metaart.org> References: <200212031459.25862.george@metaart.org> <3DED4899.4070804@iii.com> <200212032212.08868.george@metaart.org> Message-ID: <1038983788.25457.12.camel@moe> I'm probably the most junior of the group. I'm sure I would get some useful information from most any topic. If I were to pick, I would pick #2 then #3 (if it is geared towards using OO modules) M On Tue, 2002-12-03 at 22:12, George Woolley wrote: > I asked Dan Meriwether (see http://www.delux.com) > if he would be willing to give our group a talk. > He said he would be glad to and suggested that he > > > could talk on data munging (esp. HTML), writing web agents with LWP, > > Object Oriented perl, or, if not off-topic, defending a domain in a UDRP > > suit (http://www.delux.com/UDRP/) or some other such. > > Personally, I'd be quite happy with any of the of above topics. > Actually, with Dan I'd probably be OK with almost any topic. > > I said I'd get some feedback from our group. > Based on limited knowledge of the people in our group my initial thoughts are: > 1) data munging (esp. HTML) - not good with focus on HTML > because more than one person in our group is not interested in HTML. > but if focused elsewhere, might be a good topic. > 2) writing agents with LWP - good topic > 3) OO perl - good topic, but too broad > but when narrowing it, could be tricky to include everyone > maybe Using and Writing OO Modules would work > 4) defending a domain - not good > because, as he suggests, it's off-topic > > Your thoughts are welcomed and requested. Help! > I'm not attached to the above, > but it does reflect, roughly, my current awareness of the group. > So do let me and us know what you think. > -- George > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Don't comment or patch bad code; rewrite it. 10:30pm up 2 days, 22:19, 5 users, load average: 0.40, 0.13, 0.03 Linux Registered User #241685 http://counter.li.org From george at metaart.org Wed Dec 4 00:40:06 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [PBML] Perl books > OO talk? In-Reply-To: <3DED4899.4070804@iii.com> References: <200212031459.25862.george@metaart.org> <3DED4899.4070804@iii.com> Message-ID: <200212032240.06807.george@metaart.org> Belden, Thanks for your very thoughtful reply. "Writing OO Modules" is a good title for a talk addressing what I understand Mike's concerns to be. Thanks! When I said "interesting things about OO development in Perl", I was think of something like your (b) option, i.e., "(b) interesting things relating to developing one's own OO modules." Dan Meriwether has agreed to give a talk for our group. A few minutes ago I posted "What Talk Subject?" which contains a brief quote from Dan on suggested subjects. I don't know just what he has in mind for "Object Oriented perl". Kool! An offer of a talk. Thanks! Would you be willing to talk on "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" at our January meeting? If not, when? -- George On Tuesday 03 December 2002 4:13 pm, Belden Lyman wrote: > George Woolley wrote: > > Hm, can anyone suggest a title for a talk > > on what Mike finds interesting in OO? > > "Using OO Modules". > > Originally when OO came up on this list as an > arena for group talks, I assumed that the bent > of the talk would be "Writing OO Modules", or > "Understanding Perl Objects". > > > If we had someone knowlegable about OO > > speaking on that, would you be interested? > > Speaking on "Using OO Modules" ? Not really: at > the user level, the difference between a module > with an OO interface and a module with a functional > interface is pretty small. > > I'd have fun presenting code that has both an OO and > functional interface, and show programs that use either > interface. (See my first suggestion, at the end) > > > Personally, I think such a person would inevitably > > say some interesting things about OO development in Perl. > > And let's assume an open question period. > > By "interesting things about OO development in Perl", > do you mean: > > (a) interesting things relating to how Perl's OO was > developed into the language itself, or > > (b) interesting things relating to developing one's > own OO modules. > > > My questions are not academic. > > Neither are my answers :) > > > There is a fellow who has agreed to speak to us > > and one of the four topics he proposed was OO Perl. > > But what did he propose: "Using OO Modules", "Writing > Your Own OO Modules", or "Understanding Perl Objects" ? > Generally when I hear people say they want to hear about > OO Perl, I think they mean one of the latter two talks. > Find out what he's suggesting. Mike might be wanting > something different. > > > I could propose to him a more limited talk on OO, > > if someone would provide a name for it. > > Suggested above. > > > But are there a number of people who'd find that a good topic? > > > > Answers? Counter-proposals? Comments? > > I'm willing to talk about: > > "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" > "Writing OO Modules for Fun and Profit: Let Objects Transform Your CVS" > "Understanding Perl Objects: Simple Data Becomes an Object of Desire!!" > > I actually have no clue what the difference is between the second and > third talks (8o > > Belden > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland From george at metaart.org Wed Dec 4 02:07:17 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] What Talk Subject? In-Reply-To: <20021204062909.GE26996@fetter.org> References: <200212032212.08868.george@metaart.org> <20021204062909.GE26996@fetter.org> Message-ID: <200212040007.17865.george@metaart.org> Well, as I said, I'd personally be happy with any of Dan's proposed topics. And that includes the subject defending a domain which is the subect off-topic was applied to. I think your point of view on "it's off-topic" can serve us well. So everyone, shall I just tell Dan to talk on whatever he likes but to keep it "loose and happy"? Based on past experience, I expect he'd do that anyway. But it would be fun to communicate that. On Tuesday 03 December 2002 10:29 pm, David Fetter wrote: > On Tue, Dec 03, 2002 at 10:12:08PM -0800, George Woolley wrote: > > > I asked Dan Meriwether (see http://www.delux.com) if he would be > > > willing to give our group a talk. He said he would be glad to and > > > suggested that he could talk on data munging (esp. HTML), writing > > > web agents with LWP, Object Oriented perl, or, if not off-topic, > > > defending a domain in a UDRP suit (http://www.delux.com/UDRP/) or > > > some other such. > > > > Personally, I'd be quite happy with any of the of above topics. > > Actually, with Dan I'd probably be OK with almost any topic. > > > > I said I'd get some feedback from our group. > > Based on limited knowledge of the people in our group my initial thoughts > > are: 1) data munging (esp. HTML) - not good with focus on HTML > > because more than one person in our group is not interested in > > HTML. but if focused elsewhere, might be a good topic. > > 2) writing agents with LWP - good topic > > 3) OO perl - good topic, but too broad > > but when narrowing it, could be tricky to include everyone > > maybe Using and Writing OO Modules would work > > 4) defending a domain - not good > > because, as he suggests, it's off-topic > > Dave Fetter here--some of you know me from SF perl mongers, which I > helped found. > > I'd say the whole "it's off-topic" thing is a bit overblown. The > whole "there's more than one way to do it" spirit kinda implies that > we'd be working in things other than perl code like HTML, agents which > often talk to non-perl things like the standard web and ftp servers, > OO, which is originally a highly non-perl thing, domains, databases > (relational and others), etc., etc. Perl is about doing what needs > doing and not getting hung up on the small sh^Htuff. :) > > Any topic's good, keeping it loose and happy :) > > Just my $.01 (that ^#%$&^^#$#@ job market's cut a lot of budgets > lately, y'know) > > Cheers, > D From cajun at cajuninc.com Wed Dec 4 02:13:23 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] What Talk Subject? In-Reply-To: <200212040007.17865.george@metaart.org> References: <200212032212.08868.george@metaart.org> <20021204062909.GE26996@fetter.org> <200212040007.17865.george@metaart.org> Message-ID: <1038989603.26194.7.camel@moe> $loose_and_happy++; On Wed, 2002-12-04 at 00:07, George Woolley wrote: > Well, as I said, I'd personally be happy with any of Dan's proposed topics. > And that includes the subject defending a domain > which is the subect off-topic was applied to. > > I think your point of view on "it's off-topic" can serve us well. > So everyone, shall I just tell Dan to talk on whatever he likes > but to keep it "loose and happy"? > Based on past experience, I expect he'd do that anyway. > But it would be fun to communicate that. > > On Tuesday 03 December 2002 10:29 pm, David Fetter wrote: > > On Tue, Dec 03, 2002 at 10:12:08PM -0800, George Woolley wrote: > > > > I asked Dan Meriwether (see http://www.delux.com) if he would be > > > > willing to give our group a talk. He said he would be glad to and > > > > suggested that he could talk on data munging (esp. HTML), writing > > > > web agents with LWP, Object Oriented perl, or, if not off-topic, > > > > defending a domain in a UDRP suit (http://www.delux.com/UDRP/) or > > > > some other such. > > > > > > Personally, I'd be quite happy with any of the of above topics. > > > Actually, with Dan I'd probably be OK with almost any topic. > > > > > > I said I'd get some feedback from our group. > > > Based on limited knowledge of the people in our group my initial thoughts > > > are: 1) data munging (esp. HTML) - not good with focus on HTML > > > because more than one person in our group is not interested in > > > HTML. but if focused elsewhere, might be a good topic. > > > 2) writing agents with LWP - good topic > > > 3) OO perl - good topic, but too broad > > > but when narrowing it, could be tricky to include everyone > > > maybe Using and Writing OO Modules would work > > > 4) defending a domain - not good > > > because, as he suggests, it's off-topic > > > > Dave Fetter here--some of you know me from SF perl mongers, which I > > helped found. > > > > I'd say the whole "it's off-topic" thing is a bit overblown. The > > whole "there's more than one way to do it" spirit kinda implies that > > we'd be working in things other than perl code like HTML, agents which > > often talk to non-perl things like the standard web and ftp servers, > > OO, which is originally a highly non-perl thing, domains, databases > > (relational and others), etc., etc. Perl is about doing what needs > > doing and not getting hung up on the small sh^Htuff. :) > > > > Any topic's good, keeping it loose and happy :) > > > > Just my $.01 (that ^#%$&^^#$#@ job market's cut a lot of budgets > > lately, y'know) > > > > Cheers, > > D > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- IBM: Inept Bulling Menace 12:10am up 2 days, 23:59, 5 users, load average: 0.00, 0.02, 0.03 Linux Registered User #241685 http://counter.li.org From blyman at iii.com Wed Dec 4 11:10:45 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] What Talk Subject? References: <200212031459.25862.george@metaart.org> <3DED4899.4070804@iii.com> <200212032212.08868.george@metaart.org> <20021204062909.GE26996@fetter.org> Message-ID: <3DEE3715.1060800@iii.com> David Fetter wrote: > > > I'd say the whole "it's off-topic" thing is a bit overblown. The > whole "there's more than one way to do it" spirit kinda implies that > we'd be working in things other than perl code like HTML, agents which > often talk to non-perl things like the standard web and ftp servers, > OO, which is originally a highly non-perl thing, domains, databases > (relational and others), etc., etc. Perl is about doing what needs > doing and not getting hung up on the small sh^Htuff. :) > I agree. Perl's a great glue language; we should know as much about the glue as whatever we're sticking it on to. (This next part is rhetorical, not a reply to David) My not being interested in a particular subject doesn't necessarily mean that that subject isn't a good idea for discussion/presentation within opug - it just means that I'm not as curious about some things as you are. More's the loss for me, I say. Belden From blyman at iii.com Wed Dec 4 11:16:50 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [PBML] Perl books > OO talk? References: <200212031459.25862.george@metaart.org> <3DED4899.4070804@iii.com> <200212032240.06807.george@metaart.org> Message-ID: <3DEE3882.80407@iii.com> George Woolley wrote: > > "Writing OO Modules" is a good title > for a talk addressing what I understand Mike's concerns to be. > Thanks! n/p > > When I said "interesting things about OO development in Perl", > I was think of something like your (b) option, i.e., > "(b) interesting things relating to developing one's > own OO modules." Just clarifying. Both are interesting to me; the second one is probably of more general interest. > > Kool! An offer of a talk. Thanks! > Would you be willing to talk on > "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" > at our January meeting? I'd be happy to! From george at metaart.org Wed Dec 4 11:38:16 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Re: [PBML] Perl books > OO talk? In-Reply-To: <3DEE3882.80407@iii.com> References: <200212032240.06807.george@metaart.org> <3DEE3882.80407@iii.com> Message-ID: <200212040938.16336.george@metaart.org> On Wednesday 04 December 2002 9:16 am, Belden Lyman wrote: > George Woolley wrote: > > "Writing OO Modules" is a good title > > for a talk addressing what I understand Mike's concerns to be. > > Thanks! > > n/p > > > When I said "interesting things about OO development in Perl", > > I was think of something like your (b) option, i.e., > > "(b) interesting things relating to developing one's > > own OO modules." > > Just clarifying. Both are interesting to me; the second one > is probably of more general interest. > > > Kool! An offer of a talk. Thanks! > > Would you be willing to talk on > > "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" > > at our January meeting? > > I'd be happy to! Kool! Let's do that. How long, would you like to have for that (including Q/A)? From george at metaart.org Wed Dec 4 14:33:13 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Meeting? Lightning Talk? In-Reply-To: <3DE7DD16.7040706@e-tudes.net> References: <3DE7DD16.7040706@e-tudes.net> Message-ID: <200212041233.13747.george@metaart.org> Jennifer, Any chance you can make it to the Tuesday meeting? If so, would you enjoy giving a lightning talk? 5 minutes max, but as short as you want. You get to say whether you will or won't answer questions. I'm looking forward to meeting you, if you do choose to come. -- George On Friday 29 November 2002 1:33 pm, Jennifer Palm wrote: > Hello, > > I'm a post-novice perl person, having used it about 3+ years in > corporate web teams and with personal web projects. > Have been isolated from fellow perl users for too long now; am probably > coding in the stone ages. > My suggestions for learning and/or meeting topics: > - useful modules for web/cgi, esp. template modules > - tips for documenting one's own scripts and applications. > - mySQL > - always up for review on any basic perl topics - reg exes, lists, > references > > Very glad glad about new Oakland group! > > -JP > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland From extasia at mindspring.com Wed Dec 4 17:49:35 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) Message-ID: <20021204154935.A13214@new.gerasimov.net> Skipped content of type multipart/mixed-------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021204/186dd755/attachment.bin From extasia at mindspring.com Wed Dec 4 17:55:20 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) In-Reply-To: <20021204154935.A13214@new.gerasimov.net>; from extasia@mindspring.com on Wed, Dec 04, 2002 at 03:49:35PM -0800 References: <20021204154935.A13214@new.gerasimov.net> Message-ID: <20021204155520.A13308@new.gerasimov.net> At 2002/12/04/15:49 -0800 David Alban wrote: > my $codes = [ 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, > 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, > 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, > 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, > 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, > 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, > 118, 119, 120, 121, 122, 123, 124, 125, 126 ]; Heh heh. This would be much more readable as: my $codes = [ 33..126 ]; Doh! -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021204/4eb4aee5/attachment.bin From blyman at iii.com Wed Dec 4 18:18:53 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) References: <20021204154935.A13214@new.gerasimov.net> <20021204155520.A13308@new.gerasimov.net> Message-ID: <3DEE9B6D.3070109@iii.com> David Alban wrote: > At 2002/12/04/15:49 -0800 David Alban wrote: > >>my $codes = [ 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, >> 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, >> 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, >> 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, >> 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, >> 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, >> 118, 119, 120, 121, 122, 123, 124, 125, 126 ]; >> > > Heh heh. This would be much more readable as: > > my $codes = [ 33..126 ]; > > Doh! And a tad more efficient as: my $codes = [ map { chr $_ } 33..126 ]; Later, you can eliminate your call to chr(). This way you just comput the chr of each @$codes member just once, rather than each time you print it. Incidentally, why use an array ref? print $codes[ int rand @codes ]; vs print $$codes[ int rand @$codes ]; Belden From extasia at mindspring.com Wed Dec 4 18:33:02 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) In-Reply-To: <3DEE9B6D.3070109@iii.com>; from blyman@iii.com on Wed, Dec 04, 2002 at 04:18:53PM -0800 References: <20021204154935.A13214@new.gerasimov.net> <20021204155520.A13308@new.gerasimov.net> <3DEE9B6D.3070109@iii.com> Message-ID: <20021204163302.A13612@new.gerasimov.net> Belden, At 2002/12/04/16:18 -0800 Belden Lyman wrote: > my $codes = [ map { chr $_ } 33..126 ]; > > Later, you can eliminate your call to chr(). This > way you just comput the chr of each @$codes member > just once, rather than each time you print it. Awesome! Good catch. Done! New version is faster. :-) > Incidentally, why use an array ref? > > print $codes[ int rand @codes ]; > > vs > > print $$codes[ int rand @$codes ]; That's a good question. I'm not sure. I've done a lot of stuff where I need to pass data structures around, where the use of references is indicated. I guess I've just gotten into the habit of using them even when I don't have to. They're probably more inefficient if you don't need them. One more level of indirection and all that... *extasia makes mental note for future performance tuning David P.S. "obfuscate" is *really* effective when I print the output twice per side on the sheet of paper. :-) -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021204/6be37f26/attachment.bin From blyman at iii.com Wed Dec 4 18:52:33 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) References: <20021204154935.A13214@new.gerasimov.net> <20021204155520.A13308@new.gerasimov.net> <3DEE9B6D.3070109@iii.com> <20021204163302.A13612@new.gerasimov.net> Message-ID: <3DEEA351.8030307@iii.com> David Alban wrote: > > Awesome! Good catch. Done! New version is faster. :-) > > ++$faster_code; > David > > P.S. "obfuscate" is *really* effective when I print the output twice > per side on the sheet of paper. :-) > Yeesh, that's gotta look like fun. I photocopied it onto the backside of my printout - very neat. This reminds me: I've been playing waaaaay too much moria lately. All those @ symbols look like they're being attacked by molds, jellies, and yeeks! From george at metaart.org Wed Dec 4 18:55:06 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) In-Reply-To: <20021204154935.A13214@new.gerasimov.net> References: <20021204154935.A13214@new.gerasimov.net> Message-ID: <200212041655.06366.george@metaart.org> When I saw the subject, I thought "No way!". Then I thought surely he hasn't created a security guard robot powered by Perl. But having read your post, I now understand that the subject makes sense. Practical, and, to me, humorous, which is one of my favorite combinations. Thanks. -- George P.S. I suggest posting your sample output somewhere, and challenging readers to determine it's purpose. Hey, give them a break; post two samples. On Wednesday 04 December 2002 3:49 pm, David Alban wrote: > Greetings! > > I was getting ready to mail a check to my credit union for depositing > when I remembered how much the particular "security" envelopes that I > have, suck. If you hold them up to a bright light, you can identify > that there is a check inside. > > So I've implemented a perl solution. I call the program obfuscate. I > establish the decimal character codes for the printable ascii characters > then I print $rows lines of $columns columns with random ascii > characters whose codes I have put in an array. > > I then do: > > $ obfuscate | enscript -B > > once for each side of a sheet of paper I can feed to the printer. Now I > have a wrapper for the contents of my envelope that supplent the crappy > security of the security envelopes. > > It was fun to write. Here is example output: > > $ obfuscate 8 72 > obfuscate: using rows x columns => 8 x 72 > 5P~N)k<54Fuy9r]PO:4m^[oYA3h72$6+tO}y$-*I"XcRL9R1zJ2MEcv{HS1]j:XFa4A2Azs; > rpyMcSfb|84#M2lt6Q/*'5;;{x!(A'GZ?`)R06"G_"37.2=r$(fg`|1Y!^4W:C64"#MV|28` > 1V6s15i`W0IM~xg+(/.eA*,V*PO3#RwC2p73>J]Jqhn-%1sD')7y!5:S6TGXKPn9IRc1s%vz > gB'E9,,qKFy-Y#U9@-xN<,Svd:z];HhHa$?_a#vb&R*(CoH%lPB@u\!T%3HzuE?Ozv%u.h=f > '0nUe'oKYCOVSi$C-qYha;Wb3:E:vOdClh"jy=}Ef(-.`uwq$Ot>3(8+Sz3i>W-CgG<`,cuF > ^KE)QroU~UpTBjh@;bFd\@JMox#EKB2lKn$Wzaz-P}]h^Fh-?G@wECucfrD,?`5U>$ > ]|5cy%x<.[wzE7T:)~$H3.:u4Qwn\4JlLLf/Ow4H~vf#d)R[8%?Z+N~@ue,b=(b\|N0rfZcw > ';Noe77#D`*.&N1`+z8u!t>S!ra.Figc#ft,'if"1ZRh1^_S!dO5^D:3Pq:e)IU>pkt=JEh] > > The line beginning "obfuscate: using rows ..." goes to stderr. > > usage: obfuscate [ rows [ columns ]] > > David From blyman at iii.com Wed Dec 4 19:26:56 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Perl for physical security :-) References: <20021204154935.A13214@new.gerasimov.net> <200212041655.06366.george@metaart.org> Message-ID: <3DEEAB60.8050809@iii.com> George Woolley wrote: > > P.S. I suggest posting your sample output somewhere, > and challenging readers to determine it's purpose. > Hey, give them a break; post two samples. > Ugh, we'll probably think it's obfuscated Perl and try to write a spoiler ;) Belden From blyman at iii.com Wed Dec 4 19:38:57 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] cgi tutorial Message-ID: <3DEEAE31.1020807@iii.com> Jennifer said something that made me want to hunt down Ovid's CGI tutorial. So I looked at his signature on perlmonks. (wow, lots of work, there!) http://users.easystreet.com/ovid/cgi_course/ Belden From george at metaart.org Wed Dec 4 19:48:54 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] cgi tutorial In-Reply-To: <3DEEAE31.1020807@iii.com> References: <3DEEAE31.1020807@iii.com> Message-ID: <200212041748.54580.george@metaart.org> Looks really good. Thanks! On Wednesday 04 December 2002 5:38 pm, Belden Lyman wrote: > Jennifer said something that made me want to hunt down > Ovid's CGI tutorial. So I looked at his signature on > perlmonks. (wow, lots of work, there!) > > http://users.easystreet.com/ovid/cgi_course/ > > Belden From cajun at cajuninc.com Thu Dec 5 01:53:52 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Sig-Beer-EastBay Message-ID: <1039074832.3787.13.camel@moe> Well George, you missed out Bud. David, Belden and myself met tonight. We had a very good chat. Covered several perl topics as well as others. We wondered if you were coming or not. A good time was had by all ! -- Document code? Why do you think they call it "code?" 11:50pm up 3 days, 23:39, 5 users, load average: 0.04, 0.01, 0.00 Linux Registered User #241685 http://counter.li.org From george at metaart.org Thu Dec 5 11:38:00 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Sig-Beer-EastBay In-Reply-To: <1039074832.3787.13.camel@moe> References: <1039074832.3787.13.camel@moe> Message-ID: <200212050938.00609.george@metaart.org> Glad you guys had a good time. Go beer-sig! Yay, David A. for organizing it! Yay to David, Belden and Mike for making it happen! I say David A. because there are now 4 Davids on the mailing list. We are indeed growing. Well, the only Bud I had to console me was a cyber Bud I've mentioned elsewhere. See http://sinister.europortmedia.com/images.html Oh, well. :( On Wednesday 04 December 2002 11:53 pm, M. Lewis wrote: > Well George, you missed out Bud. David, Belden and myself met tonight. > We had a very good chat. Covered several perl topics as well as others. > We wondered if you were coming or not. > > A good time was had by all ! From blyman at iii.com Thu Dec 5 17:26:21 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] mini-sig-beer-east-bay Message-ID: <3DEFE09D.2040504@iii.com> David, Mike, Last night was good fun! David, you promised we could see your xfe . . . where is it already?! Belden From cajun at cajuninc.com Thu Dec 5 17:24:03 2002 From: cajun at cajuninc.com (cajun@cajuninc.com) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] mini-sig-beer-east-bay In-Reply-To: <3DEFE09D.2040504@iii.com> References: <3DEFE09D.2040504@iii.com> Message-ID: <1039130643.3defe013539ce@rattler.cajuninc.com> David, when you're ready to send out the checks for Alpha testing, let me know and I'll give you my address. M Quoting Belden Lyman : > > David, Mike, > > Last night was good fun! David, you promised we could see your > xfe . . . where is it already?! > > Belden > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland > ------------------------------------------------- This mail sent through IMP: http://horde.org/imp/ From extasia at mindspring.com Thu Dec 5 18:49:32 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] mini-sig-beer-east-bay In-Reply-To: <3DEFE09D.2040504@iii.com>; from blyman@iii.com on Thu, Dec 05, 2002 at 03:26:21PM -0800 References: <3DEFE09D.2040504@iii.com> <1039130643.3defe013539ce@rattler.cajuninc.com> <3DEFE09D.2040504@iii.com> Message-ID: <20021205164932.B23211@new.gerasimov.net> Belden, At 2002/12/05/15:26 -0800 Belden Lyman wrote: > Last night was good fun! David, you promised we could see your > xfe . . . where is it already?! I have to clean it up first... Mike, At 2002/12/05/15:24 -0800 cajun@cajuninc.com wrote: > David, when you're ready to send out the checks for Alpha testing, let me know > and I'll give you my address. Just to show you I'm a good guy, I'll pay you double what I've paid you so far. David -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021205/54b1ed3f/attachment.bin From jen at e-tudes.net Thu Dec 5 22:22:17 2002 From: jen at e-tudes.net (Jennifer Palm) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Meeting? Lightning Talk? References: <3DE7DD16.7040706@e-tudes.net> <200212041233.13747.george@metaart.org> Message-ID: <3DF025F9.3050705@e-tudes.net> About giving a lightning talk, as I described myself as post-novice (no longer a beginner; somewhere past) I may be too junior to give a ligntning talk. Want to experience one first! I agree with M. Lewis about looking forward to information on most any topic. OO perl sounds good to me. -JP George Woolley wrote: >Jennifer, >Any chance you can make it to the Tuesday meeting? >If so, would you enjoy giving a lightning talk? >5 minutes max, but as short as you want. >You get to say whether you will or won't answer questions. > >I'm looking forward to meeting you, if you do choose to come. > -- George > >On Friday 29 November 2002 1:33 pm, Jennifer Palm wrote: > >>Hello, >> >>I'm a post-novice perl person, having used it about 3+ years in >>corporate web teams and with personal web projects. >>Have been isolated from fellow perl users for too long now; am probably >>coding in the stone ages. >>My suggestions for learning and/or meeting topics: >> - useful modules for web/cgi, esp. template modules >> - tips for documenting one's own scripts and applications. >> - mySQL >> - always up for review on any basic perl topics - reg exes, lists, >>references >> >>Very glad glad about new Oakland group! >> >>-JP >> >>_______________________________________________ >>Oakland mailing list >>Oakland@mail.pm.org >>http://mail.pm.org/mailman/listinfo/oakland >> > >_______________________________________________ >Oakland mailing list >Oakland@mail.pm.org >http://mail.pm.org/mailman/listinfo/oakland > > -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/oakland/attachments/20021205/46cd27da/attachment.htm From george at metaart.org Thu Dec 5 23:58:26 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Meeting? Lightning Talk? In-Reply-To: <3DF025F9.3050705@e-tudes.net> References: <3DE7DD16.7040706@e-tudes.net> <200212041233.13747.george@metaart.org> <3DF025F9.3050705@e-tudes.net> Message-ID: <200212052158.26259.george@metaart.org> Jennifer, No need to give a lightning talk. That works for me. Does your response mean you plan to come to the meeting on Tuesday? My own plan is to give 5 lightning talks in 5 minutes including Q & A. One of my aims is to have anyone who thinks they aren't ready to give one say: "Those are lightning talks?! I can do that." (Hey, it's not my only aim.) If I'm successful, perhaps you'll give one in January or February. :-) But only if it pleases you. At our January meeting Belden Lyman will be speaking on "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" Hope that interests you a little. Based on the feedback I got earlier, I invited Dan Meriwether to speak at our February meeting on any one of the four topics he suggested and to keep it "loose and happy". One of the four topics was OO Perl. I have no idea which topic Dan will choose. I believe there's a lot of interest in OO in our group. I expect we'll come back to it many times. Do you have any interest in the Perl Basics Mailing List? Best wishes, George On Thursday 05 December 2002 8:22 pm, Jennifer Palm wrote: > About giving a lightning talk, as I described myself as post-novice (no > longer a beginner; somewhere past) I may be too junior to give a ligntning > talk. Want to experience one first! I agree with M. Lewis about looking > forward to information on most any topic. OO perl sounds good to me. > > -JP > > George Woolley wrote: > >Jennifer, > >Any chance you can make it to the Tuesday meeting? > >If so, would you enjoy giving a lightning talk? > >5 minutes max, but as short as you want. > >You get to say whether you will or won't answer questions. > > > >I'm looking forward to meeting you, if you do choose to come. > > -- George > > > >On Friday 29 November 2002 1:33 pm, Jennifer Palm wrote: > >>Hello, > >> > >>I'm a post-novice perl person, having used it about 3+ years in > >>corporate web teams and with personal web projects. > >>Have been isolated from fellow perl users for too long now; am probably > >>coding in the stone ages. > >>My suggestions for learning and/or meeting topics: > >> - useful modules for web/cgi, esp. template modules > >> - tips for documenting one's own scripts and applications. > >> - mySQL > >> - always up for review on any basic perl topics - reg exes, lists, > >>references > >> > >>Very glad glad about new Oakland group! > >> > >>-JP > >> > >>_______________________________________________ > >>Oakland mailing list > >>Oakland@mail.pm.org > >>http://mail.pm.org/mailman/listinfo/oakland > > > >_______________________________________________ > >Oakland mailing list > >Oakland@mail.pm.org > >http://mail.pm.org/mailman/listinfo/oakland From cajun at cajuninc.com Fri Dec 6 01:09:16 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] mini-sig-beer-east-bay In-Reply-To: <20021205164932.B23211@new.gerasimov.net> References: <3DEFE09D.2040504@iii.com> <1039130643.3defe013539ce@rattler.cajuninc.com> <3DEFE09D.2040504@iii.com> <20021205164932.B23211@new.gerasimov.net> Message-ID: <1039158556.12541.4.camel@moe> Wow ! We get a 100% increase in pay Belden!!! You're way too kind to us David... We're not complaining though. M On Thu, 2002-12-05 at 16:49, David Alban wrote: > Belden, > > At 2002/12/05/15:26 -0800 Belden Lyman wrote: > > Last night was good fun! David, you promised we could see your > > xfe . . . where is it already?! > > I have to clean it up first... > > Mike, > > At 2002/12/05/15:24 -0800 cajun@cajuninc.com wrote: > > David, when you're ready to send out the checks for Alpha testing, let me know > > and I'll give you my address. > > Just to show you I'm a good guy, I'll pay you double what I've paid you > so far. > > David > -- > Live in a world of your own, but always welcome visitors. > *** > Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html > Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -- Document code? Why do you think they call it "code?" 11:05pm up 4 days, 22:54, 5 users, load average: 0.03, 0.05, 0.02 Linux Registered User #241685 http://counter.li.org From cajun at cajuninc.com Fri Dec 6 02:22:18 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Sig-Beer-EastBay In-Reply-To: <200212050938.00609.george@metaart.org> References: <1039074832.3787.13.camel@moe> <200212050938.00609.george@metaart.org> Message-ID: <1039162938.13915.34.camel@moe> Well, we didn't actually have Bud. I believe the beer I had was called "Lunatic Lager". Sort of appropriate don't you think ? M On Thu, 2002-12-05 at 09:38, George Woolley wrote: > Glad you guys had a good time. > Go beer-sig! Yay, David A. for organizing it! > Yay to David, Belden and Mike for making it happen! > > I say David A. because there are now 4 Davids on the mailing list. > We are indeed growing. > > Well, the only Bud I had to console me was a cyber Bud > I've mentioned elsewhere. > See http://sinister.europortmedia.com/images.html > Oh, well. :( > > On Wednesday 04 December 2002 11:53 pm, M. Lewis wrote: > > Well George, you missed out Bud. David, Belden and myself met tonight. > > We had a very good chat. Covered several perl topics as well as others. > > We wondered if you were coming or not. > > > > A good time was had by all ! > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Thrashing is just virtual crashing. 12:20am up 5 days, 9 min, 5 users, load average: 0.02, 0.12, 0.10 Linux Registered User #241685 http://counter.li.org From george at metaart.org Fri Dec 6 10:06:32 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Sig-Beer-EastBay In-Reply-To: <1039162938.13915.34.camel@moe> References: <1039074832.3787.13.camel@moe> <200212050938.00609.george@metaart.org> <1039162938.13915.34.camel@moe> Message-ID: <200212060806.32195.george@metaart.org> "Lunatic Lager". Yes, very appropriate beer for Perl nuts. -- G On Friday 06 December 2002 12:22 am, M. Lewis wrote: > Well, we didn't actually have Bud. I believe the beer I had was called > "Lunatic Lager". Sort of appropriate don't you think ? > > M From blyman at iii.com Fri Dec 6 10:12:28 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Sig-Beer-EastBay Message-ID: <200212061612.IAA12136@molly.iii.com> Even more appropriate for Mike...! >From: George Woolley >Date: Fri, 6 Dec 2002 08:06:32 -0800 >To: oakland@mail.pm.org >Subject: Re: [oak perl] Sig-Beer-EastBay >Reply-To: oakland@mail.pm.org > >"Lunatic Lager". >Yes, very appropriate beer for Perl nuts. > -- G > >On Friday 06 December 2002 12:22 am, M. Lewis wrote: >> Well, we didn't actually have Bud. I believe the beer I had was called >> "Lunatic Lager". Sort of appropriate don't you think ? >> >> M From george at metaart.org Sun Dec 8 20:38:47 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Tue. Dec. 10 Meeting Message-ID: <200212081838.47604.george@metaart.org> Hi, All, Kool, we're about to have our second meeting on Tuesday. There are a bunch of things to commuicate about that. Most Important ----------------------- The most important thing is for you to come! Tentative Agenda --------------------------- Below is how I'm imagining the meeting. Introductions Everyone introduces themselves briefly. Just a few sentences would be kool. (Given how articulate some of us are, this could otherwise take much of the meeting.) Lightning Talks I believe 4 people have said they'll do lightning talks. My understanding is that when the 5 minute mark comes, that's it whether or not you feel you've said what you set out to say. Since I haven't seen anything about Q & A, here's my proposal: If you don't want to answer questions, fine. If you do want to do Q & A, just get them done before the 5 minutes are up. (Hey, if someone has a burning Q, they can ask it later. There are lots of options for that.) Filtering with Unix Utilities I am doing this. My experience is that when I'm data munging, I can often do much of my data research using Unix filter utilities. And they are kind of fun. Reports * Perl Basics Mailing List -- if Mike feels like saying something * Perl Quest: "Perl is All Over" -- me * East Bay Beer-Sig -- if anyone who went feels like saying anything Future Meetings * Next Meeting. where and when? maybe same time and place. i.e, 2nd Tue. of Jan., i.e. Jan. 14? Belden will be giving a talk on "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" * I've invited Dan Meiwether to speak on Tue. Feb. 11. topic: his choice of the 4 mentioned earlier. * 2nd Tue. as our regular time? * any other thoughts Logistics -------------- If you want coffee at the meeting, better bring it. I don't have coffee at my place. Feedback --------------- If you wish to communicate with me regarding any of the above, there are at least the following options: * post to this mailing list * send me personal email * call on the (gasp!) phone at (510) 839-7781 --- I'm looking forward to seeing everyone. And meeting some of you for the first time. -- George From blyman at iii.com Mon Dec 9 12:16:22 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Tue. Dec. 10 Meeting References: <200212081838.47604.george@metaart.org> Message-ID: <3DF4DDF6.9070509@iii.com> George Woolley wrote: > > Lightning Talks > I believe 4 people have said they'll do lightning talks. Refresh our minds on who said what? > My understanding is that when the 5 minute mark comes, > that's it whether or not you feel you've said what you set out to say. That's my understanding as well. > Since I haven't seen anything about Q & A, here's my proposal: > If you don't want to answer questions, fine. > If you do want to do Q & A, just get them done before the 5 minutes are up. > (Hey, if someone has a burning Q, they can ask it later. > There are lots of options for that.) > Also, speakers should say whether they want a rapt audience or whether heckling is allowed. > > Future Meetings > * Next Meeting. where and when? > maybe same time and place. i.e, 2nd Tue. of Jan., i.e. Jan. 14? > Belden will be giving a talk on > "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" I'll start with an example from PBML, pulling signatures out of an e-mail archive. First I'll show a simple script approach; from there, we'll see how that approach can be abstracted into a functional- interfaced module, and then into an OO module. At the end, we'll compare how to use the two different modules with side-by-side code that does the same thing. At least, that's my plan as of now. From george at metaart.org Mon Dec 9 18:33:37 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Tue. Dec. 10 Meeting In-Reply-To: <3DF4DDF6.9070509@iii.com> References: <200212081838.47604.george@metaart.org> <3DF4DDF6.9070509@iii.com> Message-ID: <200212091633.37578.george@metaart.org> On Monday 09 December 2002 10:16 am, Belden Lyman wrote: > George Woolley wrote: > > Lightning Talks > > I believe 4 people have said they'll do lightning talks. > > Refresh our minds on who said what? Hm, Good question. Looking back at posts and personal emails, I see 3 (not 4) people saying they'll do lightning talks. * Dave Fetter * George Woolley (oh, my, that's me?!) * Mike Lewis As far as I can tell, I, somehow, forgot to ask you. So I'll do it now: Belden, would you be willing to give a lightning talk tomorrow? ====== begin aside ========================================= All, anyone else want to give a lightning talk tomorrow? -- G \===== end aside ===========================================/ > > My understanding is that when the 5 minute mark comes, > > that's it whether or not you feel you've said what you set out to say. > > That's my understanding as well. Kool! 5 minutes and then onto the next talk. > > Since I haven't seen anything about Q & A, here's my proposal: > > If you don't want to answer questions, fine. > > If you do want to do Q & A, just get them done before the 5 minutes are > > up. (Hey, if someone has a burning Q, they can ask it later. > > There are lots of options for that.) > > Also, speakers should say whether they want a rapt audience > or whether heckling is allowed. Sounds good to me. (Not sure what I'll opt for personally -- maybe, heckling encouraged?!?) > > Future Meetings > > * Next Meeting. where and when? > > maybe same time and place. i.e, 2nd Tue. of Jan., i.e. Jan. 14? > > Belden will be giving a talk on > > "Using OO Modules: Comparing Functional and Object-Oriented Interfaces" > > I'll start with an example from PBML, pulling signatures out of an > e-mail archive. First I'll show a simple script approach; from there, > we'll see how that approach can be abstracted into a functional- > interfaced module, and then into an OO module. At the end, we'll compare > how to use the two different modules with side-by-side code that does > the same thing. > > At least, that's my plan as of now. Thanks for the preview. ====== begin aside =============================================== Mike, Belden makes reference to PBML. We have a number of new people on the list. Some of them may not know what PBML is. Would you be willing to make a post saying something like the following? PBML is an abbreviation for ... You can subscribe to PBML at ... You can also access the PBML archive there. It's kool because ... And perhaps do something similar at the meeting (Tuesday)? -- G \====== end aside================================================/ -- G From blyman at iii.com Mon Dec 9 18:55:29 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] Tue. Dec. 10 Meeting References: <200212081838.47604.george@metaart.org> <3DF4DDF6.9070509@iii.com> <200212091633.37578.george@metaart.org> Message-ID: <3DF53B81.2040804@iii.com> George Woolley wrote: > As far as I can tell, I, somehow, forgot to ask you. > So I'll do it now: > Belden, would you be willing to give a lightning talk tomorrow? I'll pass :) btw, if anyone needs a ride from BART to George's place tomorrow, let me know. I can seat 3 passengers. fwiw, I actually know where George lives. Belden From blyman at iii.com Tue Dec 10 15:00:40 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:25 2004 Subject: [oak perl] OO discussion on perlmonks Message-ID: <3DF655F8.5030304@iii.com> Some of the Oakland.pm members have posed the general question: "What the hell is OO?" Someone just asked that on perlmonks; check out: http://perlmonks.org/index.pl?node_id=218391 The reply from [jreades] and [demerphq] are pretty good, give them a close read. Belden From blyman at iii.com Tue Dec 10 15:10:25 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] OO discussion on perlmonks References: <3DF655F8.5030304@iii.com> Message-ID: <3DF65841.20706@iii.com> Belden Lyman wrote: > > Some of the Oakland.pm members have posed the general > question: "What the hell is OO?" > > Someone just asked that on perlmonks; check out: > http://perlmonks.org/index.pl?node_id=218391 > > The reply from [jreades] and [demerphq] are pretty good, > give them a close read. > > Belden > And, more broadly - also by [jreades] - http://perlmonks.org/index.pl?node_id=218778 Belden From cajun at cajuninc.com Wed Dec 11 00:57:56 2002 From: cajun at cajuninc.com (M. Lewis) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] PBML Mailing List Message-ID: <1039589876.10065.5.camel@moe> First off, it was nice meeting everyone tonight. As promised, here is the information on the Perl Basics Mailing List: - a very general goal of the mailing list is that any question may be asked without fear of being made to feel badly about your lack of knowledge or confusion. To subscribe to the list, you can click this link: mailto:pbml-request@cajuninc.com?subject=subscribe Alternatively, you can go to: http://rattler.cajuninc.com/mailman/listinfo/pbml and signup on that page. Any questions or problems, let me know. The list is housed on my server. Your address WILL NOT be divulged to anyone other than the other list members. Mike -- ..... REALITY.SYS Corrupted - Unable to recover Universe 10:50pm up 22:41, 4 users, load average: 0.01, 0.14, 0.08 Linux Registered User #241685 http://counter.li.org From george at metaart.org Wed Dec 11 14:18:00 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Thanks, Regex In-Reply-To: <1039589876.10065.5.camel@moe> References: <1039589876.10065.5.camel@moe> Message-ID: <200212111218.00733.george@metaart.org> Mike, It was good to meet you in person. Thanks: Thanks for being at the meeting and giving a lightning talk and for telling people about the Perl Basics Mailing List. Oh, yeah, and for following up with a post to the Oakland.pm Mailing List. 9 people. Wow! Regex: Perhaps, I'll see you Thursday evening. Anyway, thanks for loaning me the book. I've looked at a little last night, including a quick peak at the regular expressions chapter. Best wishes, George From shooshidar at earthlink.net Wed Dec 11 19:07:20 2002 From: shooshidar at earthlink.net (Siamak Hooshidar) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Why UNIX is better than Windows... By Microsoft Message-ID: An MS paper on hotmail Win2k conversion: http://www.theregister.co.uk/content/4/28226.html And how it become public: http://www.wired.com/news/infostructure/0,1377,56481,00.html From george at metaart.org Wed Dec 11 19:35:12 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Why UNIX is better than Windows... By Microsoft In-Reply-To: References: Message-ID: <200212111735.12198.george@metaart.org> Siamak, Thanks for posting these interesting links. -- George On Wednesday 11 December 2002 5:07 pm, Siamak Hooshidar wrote: > An MS paper on hotmail Win2k conversion: > > http://www.theregister.co.uk/content/4/28226.html > > And how it become public: > > http://www.wired.com/news/infostructure/0,1377,56481,00.html From george at metaart.org Thu Dec 12 15:01:00 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Meeting Fall Out In-Reply-To: <200212081838.47604.george@metaart.org> References: <200212081838.47604.george@metaart.org> Message-ID: <200212121301.00138.george@metaart.org> 9 people at the meeting. I was amazed. OK, here's some miscellaneous things that came out of the meeting. I am sure there are more. Please add what you know. brief writeup of the meeting at http://oakland.pm.org/meetings/meetings_2002.html what's a lightning talk at: http://www.metaart.org/maca/perl/lightning/lightning_what.html notes on my lightning talks at: http://www.metaart.org/maca/perl/lightning/lightnings.html notes on my talk on UNIX Filtering at: http://www.metaart.org/maca/unix/filters.txt next meeting announcement in upper right corner at: http://oakland.pm.org requests for listings, etc. based on meeting inputs: * to O'Reilly User Group Program for membership * to SiliconValley.pm for listing * to Linux Mafia.pm for listing From blyman at iii.com Thu Dec 12 15:15:52 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Meeting Fall Out References: <200212081838.47604.george@metaart.org> <200212121301.00138.george@metaart.org> Message-ID: <3DF8FC88.8000609@iii.com> George, George Woolley wrote: > next meeting announcement in upper right corner at: > http://oakland.pm.org This says "cost: no fee for our meetings". The folks at Village Restaurant have requested that everyone order something - could you add some such text, please. Belden From george at metaart.org Thu Dec 12 15:26:17 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Meeting Fall Out In-Reply-To: <3DF8FC88.8000609@iii.com> References: <200212081838.47604.george@metaart.org> <200212121301.00138.george@metaart.org> <3DF8FC88.8000609@iii.com> Message-ID: <200212121326.17709.george@metaart.org> Yes. It has been added. On Thursday 12 December 2002 1:15 pm, Belden Lyman wrote: > George, > > George Woolley wrote: > > next meeting announcement in upper right corner at: > > http://oakland.pm.org > > This says "cost: no fee for our meetings". The folks at > Village Restaurant have requested that everyone order > something - could you add some such text, please. > > Belden > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland From george at metaart.org Thu Dec 19 13:09:31 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Seasons Greetings In-Reply-To: <3DF655F8.5030304@iii.com> References: <3DF655F8.5030304@iii.com> Message-ID: <200212191109.31693.george@metaart.org> ==================================== Some may say this is off-topic, but I've heard on this list that 'off-topic' is an overrated idea. Anyway, it's Christmas time. ==================================== My small offering for Christmas is the page I created for my granddaughter Isabelle for this Christmas which is at http://www.metaart.org/isaland/seasons/seasons_christmas_when.html I learned of the snow from Ronnie Afaro, the group leader of Costa Rica.pm (where it doesn't snow). But from conversations with him and with my daughter Rachel, I gather the snow symbolizes the magic of the season. Works for me. Happy Holidays and the magic of the season to you, George From extasia at mindspring.com Thu Dec 19 13:32:16 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas Message-ID: <20021219113216.A4602@new.gerasimov.net> ----- Forwarded message from ----- Date: Thu, 19 Dec 2002 14:28:15 -0500 From: "Richard A. Nakroshis" Subject: [dcpm] How Perl Powers Christmas To: DC Perl Mongers Mailing List Organization: Defense Security Service Reply-To: dc@lists.pm.org If you haven't seen it yet, O'Reilly has a wonderful tongue-in-cheek article titled "How Perl Powers Christmas". http://www.perl.com/pub/a/2002/12/18/hohoho.html Rick ----- End forwarded message ----- -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021219/fd26acd3/attachment.bin From blyman at iii.com Thu Dec 19 13:58:00 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] to reply or not to reply Message-ID: <3E0224C8.5070103@iii.com> If you don't like rants, don't read this. I use a threaded e-mail client. That means that my mail boxes just show the top-level message in an e-mail thread. There's a little widget I can click on that expands the top message into the entire thread. You might check whether your e-mail client supports threads; they're a handy way of visually organizing your messages. Within the headers of each e-mail, there are some chingaderas that show the message's history; if this message is a reply to the other message, then this message will have that other message's identifier in it. Threaded e-mail clients work by figuring out which messages are replies to which other messages, and thereby builds the threads. So, replying to messages actually has a different effect than starting a new message. When you really mean to reply, then replying is really handy for threaded e-mail clients, eg: Subject: [oak-perl] Perl books? | |-Subject: Re: [oak-perl] Perl books? | | | |-Subject: Re: Re: [oak-perl] Perl books? | `-Subject: Re: Re: [oak-perl] Perl books? | |-Subject: Re: [oak-perl] Perl books? |-Subject: Re: [oak-perl] Perl books? `-Subject: Re: [oak-perl] Perl books? However, sometimes people will just get lazy, and instead of typing a new message to the Oakland list, they'll just reply to an old, unrelated message - editing out all the old message body. So stuff like this occassionally pops up in my client: Subject: [oak-perl] one-liner | `-Subject: Re: [oak-perl] one-liner |-Subject: [oak-perl] I have an urgent question | |-Subject: Re: [oak-perl] I have an urgent question | | |-Subject: Re: Re: [oak-perl] I have an urgent question | | `-Subject: Re: Re: [oak-perl] I have an urgent question | `-Subject: Re: [oak-perl] I have an urgent question `-Subject: Re: Re: [oak-perl] one-liner? See, the whole "I have an urgent question" thread gets sucked into the "one-liner" thread. Really, the "urgent question" thread should appear as a top-level thread of its own. What makes this worse is when the "one-liner" thread is several days old, and the "urgent question" thread suddenly pops in: I might not be reading the "one- liner" thread any more, so might miss out on your urgent question. Now, in addition to my mail client being threaded, so are the Oakland list archives. This means that replies-that-are-not-truly-replies-but- are-in-fact-new-messages get buried in the archives when you view them in threaded mode. So please humor this mailing list scrooge by asking yourself: is what I'm about to send really a reply? Or is it a whole new topic altogether? If it's a new topic, consider starting a new message rather than replying to an old one. Thanks- Mr. Bah-Humbug From blyman at iii.com Thu Dec 19 14:09:16 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas References: <20021219113216.A4602@new.gerasimov.net> Message-ID: <3E02276C.10500@iii.com> Great article. Thanks for the link, David. David Alban wrote: > ----- Forwarded message from ----- > > Date: Thu, 19 Dec 2002 14:28:15 -0500 > From: "Richard A. Nakroshis" > Subject: [dcpm] How Perl Powers Christmas > To: DC Perl Mongers Mailing List > Organization: Defense Security Service > Reply-To: dc@lists.pm.org > > If you haven't seen it yet, O'Reilly has a wonderful tongue-in-cheek > article titled "How Perl Powers Christmas". > > http://www.perl.com/pub/a/2002/12/18/hohoho.html > > Rick > > ----- End forwarded message ----- > From extasia at mindspring.com Thu Dec 19 14:05:47 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas In-Reply-To: <3E02276C.10500@iii.com>; from blyman@iii.com on Thu, Dec 19, 2002 at 12:09:16PM -0800 References: <20021219113216.A4602@new.gerasimov.net> <3E02276C.10500@iii.com> Message-ID: <20021219120547.A4835@new.gerasimov.net> At 2002/12/19/12:09 -0800 Belden Lyman wrote: > Great article. Thanks for the link, David. :-) Now to figure out how to write a perl program that will improve the economy and create lots of new tech jobs... -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021219/d84cffd4/attachment.bin From extasia at mindspring.com Thu Dec 19 14:10:55 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] to reply or not to reply In-Reply-To: <3E0224C8.5070103@iii.com>; from blyman@iii.com on Thu, Dec 19, 2002 at 11:58:00AM -0800 References: <3E0224C8.5070103@iii.com> Message-ID: <20021219121055.B4835@new.gerasimov.net> FYI, mutt has a threaded mode. When I compose a message to a list which is not a reply, I often do go into my mail folder for that list, choose a message, and hit 'reply'. But I always delete the old In-Reply-To header (upon which most threads are based, I think) and any extraneous recipients. And I change the subject. I don't know how other mail programs work, though. Maybe some don't give you the option of deleting an In-Reply-To header. David -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021219/d7ffaa24/attachment.bin From blyman at iii.com Thu Dec 19 15:33:23 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas References: <20021219113216.A4602@new.gerasimov.net> <3E02276C.10500@iii.com> <20021219120547.A4835@new.gerasimov.net> Message-ID: <3E023B23.1040208@iii.com> David Alban wrote: > At 2002/12/19/12:09 -0800 Belden Lyman wrote: > >>Great article. Thanks for the link, David. > > > :-) > > Now to figure out how to write a perl program that will improve the > economy and create lots of new tech jobs... > David, The program is simple. You just need to write the back-end modules. Belden #!/usr/bin/perl use strict; use warnings; use Tech::Sector; use Linus::Torvalds; use Bill::Gates qw(unholy_trade_practices); # Bill::Gates not OO :( use Bill::Joy; my $java_peddler = Bill::Joy->new(); my $revolutionary = Linus::Torvalds->new(); my $market = new Tech::Sector; # singleton class, this sucks :( do { # gotta do it at least once $java_peddler->buzzwordiness()--; our $strategy = $revolutionary->new_idea(); $market->consider( $strategy ); } until ( ! unholy_trade_practices() or $market->recovers() ); __END__ Can't locate Tech/Sector.pm in @INC (@INC contains: /usr/local/lib/perl5/5.8.0/alpha-dec_osf /usr/local/lib/perl5/5.8.0 /usr/local/lib/perl5/site_perl/5.8.0/alpha-dec_osf /usr/local/lib/perl5/site_perl/5.8.0 /usr/local/lib/perl5/site_perl .) at dt line 5. BEGIN failed--compilation aborted at dt line 5. Grumble, hurry up with that new Tech::Sector.pm, David. From blyman at iii.com Thu Dec 19 15:45:24 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas References: <20021219113216.A4602@new.gerasimov.net> <3E02276C.10500@iii.com> <20021219120547.A4835@new.gerasimov.net> <3E023B23.1040208@iii.com> Message-ID: <3E023DF4.8080609@iii.com> Belden Lyman wrote: > > use Bill::Gates qw(unholy_trade_practices); # Bill::Gates not OO :( > Obviously the Bill::Gates module can't be Object-Oriented. This is because in Perl, variables are made into objects by C-ing them into a C. First, Bill::Gates most likey does not have a proper C; even if a C existed, the function &unholy_trade_practices() is not convertible into a method that a C-ed object can use. > > my $market = new Tech::Sector; # singleton class, this sucks :( > A singleton class is one that, no matter how many times you ask it to create a new object, will just keep returning the same object back to you. The reason a singleton Tech::Sector sucks should therefore be obvious: if someone were to patch Tech::Sector.pm to allow multiple market objects to be created, then we could run a multi-process simulation to figure out the best environment for a healthy Tech::Sector. Belden From lcurrie at CalAcademy.Org Fri Dec 20 14:12:27 2002 From: lcurrie at CalAcademy.Org (Larry Currie) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Customizing a Barcode Checkdigit Subroutine Message-ID: <3E0379AB.58530A82@calacademy.org> I wonder if anyone would be willing to help me modify a checkdigit subroutine to fit our particular circumstances. (If you think it would be better to send this query to the Perl Basics Mailing List, I may try that also.) Under our current library system, we use 14 digit patron barcodes, and the 14th digit is determined as follows: 1. Multiply every other digit starting with the leftmost by 2 and total the digits of any multi-digit product. Sum the resulting digits. 2. Add remainder of digits (every other digit starting with the second from the left). 3. Add result of step 1 and step 2 and substract the rightmost digit of the sum from 10 to obtain the check digit. Example: Given: 2 1 1 1 2 0 0 0 6 9 8 1 3 C (C to be determined) (mult by 2) 4 2 4 0 12 16 6 sum = 26 step 1 1 1 0 0 9 1 sum = 12 step 2 Step 3: 26 + 12 ----- 38 10 - 8 = 2 = check digit. Back in January, I tried to modify the checkdigit subroutine to fit our circumstances, but I'm not sure that my code was completely successful. Would anyone want to take a shot at modifying this subroutine to fit our circumstances, since we would like to use our existing patron barcodes in our new library system? The code, as it currently stands, is given below, and is based on a barcode number that is 9 characters long (the letter V followed by 8 digits). A valid barcode number returns the value of "1" in the variable $valid. sub checkdigit { my ($env,$infl) = @_; $infl = uc $infl; my @weightings = (8,4,6,3,5,2,1); my $sum; my $i = 1; my $valid = 0; # print $infl."
"; while ($i <8) { my $temp1 = $weightings[$i-1]; my $temp2 = substr($infl,$i,1); $sum = $sum + ($temp1*$temp2); # print "$sum $temp1 $temp2
"; $i++; } my $rem = ($sum%11); if ($rem == 10) { $rem = "X"; } #print $rem."
"; if ($rem eq substr($infl,8,1)) { $valid = 1; } Larry Currie -- Lawrence W. Currie User Services Librarian California Academy of Sciences Golden Gate Park San Francisco, CA 94118 lcurrie@calacademy.org (415) 750-7108 (415) 750-7106 fax http://www.calacademy.org/research/library/ From blyman at iii.com Fri Dec 20 15:11:57 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Customizing a Barcode Checkdigit Subroutine References: <3E0379AB.58530A82@calacademy.org> Message-ID: <3E03879D.6000109@iii.com> Larry - The example you submitted looks a bit off. 2111200069813 2 1 2 0 6 8 3 # 4 + 2 + 4 + 0 + 12 + 16 + 6 = 44 1 1 0 0 9 1 # 1 + 1 + 0 + 0 + 9 + 1 = 12 How do you get 26 rather than 44? Have you checked CPAN for Barcode modules? Belden From lcurrie at CalAcademy.Org Fri Dec 20 15:33:56 2002 From: lcurrie at CalAcademy.Org (Larry Currie) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Customizing a Barcode Checkdigit Subroutine References: <3E0379AB.58530A82@calacademy.org> <3E03879D.6000109@iii.com> Message-ID: <3E038CC3.8165BB07@calacademy.org> Belden, The 12 and the 16 are to be added as 1 + 2 and 1 + 6. ;). Larry Belden Lyman wrote: > Larry - > > The example you submitted looks a bit off. > > 2111200069813 > 2 1 2 0 6 8 3 # 4 + 2 + 4 + 0 + 12 + 16 + 6 = 44 > 1 1 0 0 9 1 # 1 + 1 + 0 + 0 + 9 + 1 = 12 > > How do you get 26 rather than 44? > > Have you checked CPAN for Barcode modules? > > Belden > > _______________________________________________ > Oakland mailing list > Oakland@mail.pm.org > http://mail.pm.org/mailman/listinfo/oakland -- Lawrence W. Currie User Services Librarian California Academy of Sciences Golden Gate Park San Francisco, CA 94118 lcurrie@calacademy.org (415) 750-7108 (415) 750-7106 fax http://www.calacademy.org/research/library/ From blyman at iii.com Fri Dec 20 16:01:41 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Customizing a Barcode Checkdigit Subroutine References: <3E0379AB.58530A82@calacademy.org> <3E03879D.6000109@iii.com> <3E038CC3.8165BB07@calacademy.org> Message-ID: <3E039345.6050906@iii.com> There's only one mod (%) in this, so it really zips along. If speed is really a concern, re-write it in Inline::C. That's left as an exorcise for the reader :) sub checkdigit { my $bar = shift; length $bar == 13 or do { warn "$bar not 13 digits long, skipping\n"; return undef; }; my $sum; for ( 0, 2, 4, 6, 8, 10, 12 ) { # all odd positions my $num = substr($bar, $_, 1) * 2; $sum += $num > 9 ? $num - 9 : $num ; # magic 9 :) } $sum += substr $bar, $_, 1 for ( 1, 3, 5, 7, 9, 11 ); my $check = 10 - $sum % 10; $check = 'X' if $check == 10; return $check; } Larry Currie wrote: > Belden, > > The 12 and the 16 are to be added as 1 + 2 and 1 + 6. ;). > > Larry > > From extasia at mindspring.com Fri Dec 20 19:55:13 2002 From: extasia at mindspring.com (David Alban) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas In-Reply-To: <3E023B23.1040208@iii.com>; from blyman@iii.com on Thu, Dec 19, 2002 at 01:33:23PM -0800 References: <20021219113216.A4602@new.gerasimov.net> <3E02276C.10500@iii.com> <20021219120547.A4835@new.gerasimov.net> <3E023B23.1040208@iii.com> Message-ID: <20021220175513.C15942@new.gerasimov.net> At 2002/12/19/13:33 -0800 Belden Lyman wrote: > The program is simple. You just need to write the back-end modules. Awesome! I'll have to learn OO first. :-) -- Live in a world of your own, but always welcome visitors. *** Come to sig-beer-west! http://www.gerasimov.net/~alban/sig.beer.west.html Unix sysadmin available: http://www.gerasimov.net/~alban/jac/resume.html -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/pipermail/oakland/attachments/20021220/01156d02/attachment.bin From george at metaart.org Fri Dec 20 22:16:54 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] O'Reilly User Group Program In-Reply-To: <20021220175513.C15942@new.gerasimov.net> References: <20021219113216.A4602@new.gerasimov.net> <3E023B23.1040208@iii.com> <20021220175513.C15942@new.gerasimov.net> Message-ID: <200212202016.54359.george@metaart.org> We are now a member of the O'Reilly User Group Program. This entitles us to certain benefits. For a bit more detail, see http://oakland.pm.org/detail/oreilly.html Because of our membership, we have received the following offer which Marsee Henon who deals with such things at O'Reilly asked me to forward to you if I could. It seemed to me that it might actually be interesting to one or two of you. (I am considering it.) =========================================== Remember the first online Soap? We do. Check out the 2003 O'Reilly Anniversary Calendar-- jam-packed with pictures, tales, geek history, O'Reilly lore, pithy quotes, and more--at: http://www.thinkgeek.com/interests/oreilly Put Up An O'Reilly ThinkGeek Banner, Get A Free Book O'Reilly is looking for UG members to display our ThinkGeek calendar banners on their personal web sites. Please send a link to your site with our banner to marsee@oreilly.com and we will send you the O'Reilly book of your choice. ThinkGeek Banners: http://ug.oreilly.com/banners/thinkgeek/ \==========================================/ Oh yeah, can anyone identify any of the people in the banners? -- G From george at metaart.org Sat Dec 21 11:09:08 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Dan Meriwether Talk at February 11 Meeting In-Reply-To: <20021220175513.C15942@new.gerasimov.net> References: <20021219113216.A4602@new.gerasimov.net> <3E023B23.1040208@iii.com> <20021220175513.C15942@new.gerasimov.net> Message-ID: <200212210909.08236.george@metaart.org> I got email from Dan Meriwether this morning. He has agreed to talk at our February 11th meeting. He says he'll talk on "munging or LWP; or maybe OOP". Likely, he'll be willing to be more specific as we get closer. He's going skiing just a few days before and has in the past busted some body parts doing that. Hopefully (both for him and us) he won't do that this time. But if he does, we can just have more lightning talks than ususual, more socializing and a shorter meeting. -- G From dave at toppledwagon.com Sat Dec 21 15:52:34 2002 From: dave at toppledwagon.com (David B. Peterson) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Re: Customizing a Barcode Checkdigit Subroutine Message-ID: There is an interesting property of numbers that you can use for this calculation. If you add the individual digits of a number and subtract 9 from it as many times as necessary, you will eventually get the sum of the two numbers. So, if you have a number such as 17 1+7 = 8, 17-9 = 8 too. Since you are only dealing with single digits multiplied by 2, the highest number you will use is 18. So you will only need to ever subtract 9 once. I believe your library card system uses what we call a LUHN-10 check. This is the same check used to determine a 'valid' credit card number (for some definition of valid. :) This works for visa, mastercard, american express, discover, and many others. Here is a little routine I wrote a hell of a long time ago for this purpose. sub LUHN10 { my ($a, @cc, $sum); my ($cc = @_[0]); $cc =~ tr/0-9//cd; @cc = split('', $cc); while (@cc) { $sum += pop(@cc); $a = pop(@cc) * 2; $a -= 9 if $a > 9; $sum += $a; } return (!($sum % 10)); } used as such: LUHN10('visa: 4444444444445555'); LUHN10('4444 4444 4444 5555'); It doesn't care about any non digit chars. And as such, I'm always disgusted by commerce sites that require me to leave the spaces out of my credit card number. It shouldn't matter one iota to the computer, but it sure makes it easier for me to see if I've made a typo when I can put spaces in there. Have fun. -Dave From blyman at iii.com Mon Dec 23 13:31:33 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] O'Reilly User Group Program References: <20021219113216.A4602@new.gerasimov.net> <3E023B23.1040208@iii.com> <20021220175513.C15942@new.gerasimov.net> <200212202016.54359.george@metaart.org> Message-ID: <3E076495.4060407@iii.com> George Woolley wrote: > We are now a member of the O'Reilly User Group Program. > This entitles us to certain benefits. > For a bit more detail, see http://oakland.pm.org/detail/oreilly.html > > ThinkGeek Banners: > http://ug.oreilly.com/banners/thinkgeek/ > \==========================================/ > > Oh yeah, can anyone identify any of the people in the banners? > -- G > I think the guy with the Pringles can is Rob Flickenger; I read an article on O'Reilly.com a few months back about using a Pringles can as an 802.11 antenna. I think it was by him; his book certainly talks about it. http://www.oreilly.com/catalog/wirelesscommnet/index.html http://www.oreillynet.com/pub/a/wireless/2001/05/03/longshot.html Not the article I'm thinking of, but amusing nonetheless. If we start having regular Oakland.pm meetings at Village Restaurant, I might be inspired to try throwing my 802.11 signal about a block to get us wireless access. Not for this first meeting though! :o From blyman at iii.com Mon Dec 23 13:55:05 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (fwd) How Perl Powers Christmas References: <20021219113216.A4602@new.gerasimov.net> <3E02276C.10500@iii.com> <20021219120547.A4835@new.gerasimov.net> <3E023B23.1040208@iii.com> <20021220175513.C15942@new.gerasimov.net> Message-ID: <3E076A19.4060006@iii.com> David Alban wrote: > At 2002/12/19/13:33 -0800 Belden Lyman wrote: > >>The program is simple. You just need to write the back-end modules. > > > Awesome! I'll have to learn OO first. :-) > Go ahead and start with the Bill::Gates.pm module, as I explained this can't possibly be OO :) From blyman at iii.com Mon Dec 23 14:47:48 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Re: Customizing a Barcode Checkdigit Subroutine References: Message-ID: <3E077674.9040400@iii.com> David B. Peterson wrote: > > There is an interesting property of numbers that you can use for this > calculation. > > If you add the individual digits of a number and subtract 9 from it as > many times as necessary, you will eventually get the sum of the two > numbers. For any base N counting system where N > 9, N - 1 has similar properties. Mathemagics are nifty :) > > Here is a little routine I wrote a hell of a long time ago for this > purpose. > > sub LUHN10 { > my ($a, @cc, $sum); > my ($cc = @_[0]); > $cc =~ tr/0-9//cd; > @cc = split('', $cc); > while (@cc) { > $sum += pop(@cc); > $a = pop(@cc) * 2; > $a -= 9 if $a > 9; > $sum += $a; > } > return (!($sum % 10)); > } > > used as such: > > LUHN10('visa: 4444444444445555'); > LUHN10('4444 4444 4444 5555'); > > It doesn't care about any non digit chars. > Two thoughts: 1. my ( $cc = @_[0] ); doesn't compile. btw, you mean $_[0], or shift(@_), but not @_[0]. 2. sort() uses magical variables $a and $b, so it's a good idea to stay away from them. > > And as such, I'm always disgusted by commerce sites that require me to > leave the spaces out of my credit card number. It shouldn't matter one > iota to the computer, but it sure makes it easier for me to see if I've > made a typo when I can put spaces in there. > > I agree. Rant at Jennifer, she's writing an e-commerce site right now ;) Belden > Have fun. > > -Dave From blyman at iii.com Mon Dec 23 16:43:30 2002 From: blyman at iii.com (Belden Lyman) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Re: Customizing a Barcode Checkdigit Subroutine References: Message-ID: <3E079192.9030504@iii.com> I just realized that there's a small difference between LUHN-10 and what Larry wants. At the end of all the math, Larry wants the checkdigit to be the tens-complement for the sum; however, LUHN-10 returns ``(!($sum % 10))'' rather than ``10 - sum % 10''. So the algorithms, though very similar, are not identical. Belden David B. Peterson wrote: > > There is an interesting property of numbers that you can use for this > calculation. > > If you add the individual digits of a number and subtract 9 from it as > many times as necessary, you will eventually get the sum of the two > numbers. > > So, if you have a number such as 17 1+7 = 8, 17-9 = 8 too. Since you > are only dealing with single digits multiplied by 2, the highest number > you will use is 18. So you will only need to ever subtract 9 once. > > I believe your library card system uses what we call a LUHN-10 check. > This is the same check used to determine a 'valid' credit card number > (for some definition of valid. :) This works for visa, mastercard, > american express, discover, and many others. > > Here is a little routine I wrote a hell of a long time ago for this > purpose. > > sub LUHN10 { > my ($a, @cc, $sum); > my ($cc = @_[0]); > $cc =~ tr/0-9//cd; > @cc = split('', $cc); > while (@cc) { > $sum += pop(@cc); > $a = pop(@cc) * 2; > $a -= 9 if $a > 9; > $sum += $a; > } > return (!($sum % 10)); > } > > used as such: > > LUHN10('visa: 4444444444445555'); > LUHN10('4444 4444 4444 5555'); > > It doesn't care about any non digit chars. > > > And as such, I'm always disgusted by commerce sites that require me to > leave the spaces out of my credit card number. It shouldn't matter one > iota to the computer, but it sure makes it easier for me to see if I've > made a typo when I can put spaces in there. > > > Have fun. > > -Dave From george at metaart.org Mon Dec 23 21:29:46 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] O'Reilly User Group Newsletter: December 23, 2002 In-Reply-To: <20021220175513.C15942@new.gerasimov.net> References: <20021219113216.A4602@new.gerasimov.net> <3E023B23.1040208@iii.com> <20021220175513.C15942@new.gerasimov.net> Message-ID: <200212231929.46447.george@metaart.org> We have received a newsletter from the O'Reilly UG Program. You may want to take a look at it at http://oakland.pm.org/newsletters/2002/nl_200212.txt Let me know if you want to review a particular O'Reilly book you see in the newsletter. I may be able to get you a review copy. From dave at toppledwagon.com Wed Dec 25 21:44:53 2002 From: dave at toppledwagon.com (David B. Peterson) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] (no subject) Message-ID: >Two thoughts: > >1. my ( $cc = @_[0] ); doesn't compile. > btw, you mean $_[0], or shift(@_), but not @_[0]. This was written in perl 4. I said it was old. :) Actually, I s/local/my/ before I pasted it into the email. $cc = $_[0] is correct. hmmm, my example does compile on my perl. I'm not saying it's correct, but it works on: This is perl, v5.6.0 built for darwin maybe 5.8 is more strict (as it should be!) >2. sort() uses magical variables $a and $b, so it's a good > idea to stay away from them. One would hope that a subroutine would my() the variables so as not to stomp on mine. That being said, you are right, I should stay away from $a and $b as not all code is written properly. -Dave From george at metaart.org Thu Dec 26 20:15:31 2002 From: george at metaart.org (George Woolley) Date: Mon Aug 2 21:33:26 2004 Subject: [oak perl] Exploratorium January 1 Message-ID: <200212261815.31894.george@metaart.org> I thought some of you might be interested in this from Sonoma.pm mailing list. Of course you may already know about it. Oh, well. Hope you had a good Cristmas. -- G ---------- Forwarded Message ---------- ... Date: Thu, 26 Dec 2002 17:00:24 -0800 From: "Tom Anderson (Thomas H)" To: Kevin Bingham Cc: santa-rosa-pm-list@happyfunball.pm.org There will be a meeting of Perl Monks and others who are interested at the Exploratorium on Jan 1, 2003 at 6:00PM. This is a 'free Wednesday' so admission is free, and they are open until 9PM. I'm going to set up an exact meeting place, so check the node at http://www.perlmonks.org/index.pl?node_id=222291 and the replies for more info. Contact t@tomacorp.com if you have questions. Thanks! -Tom Anderson ...