From rspier at pobox.com Wed Jul 5 21:21:56 2006 From: rspier at pobox.com (Robert Spier) Date: Wed, 05 Jul 2006 21:21:56 -0700 Subject: [LA.pm] FW: [pm_groups] Call for proposals -- Perl Foundation Grants References: <20060705093932.GF876@domm2.zsi.at> Message-ID: === Forwarded Message: Date: Wed, 5 Jul 2006 11:39:32 +0200 From: Thomas Klausner To: pm_groups at pm.org Subject: [pm_groups] Call for proposals -- Perl Foundation Grants Hi! Please forward the Call for Proposals to your local groups. The last call didn't result in any grants because there weren't enough / interesting / correct proposals. http://news.perlfoundation.org/2006/07/call_for_proposals_perl_founda.html -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} -- Request pm.org Technical Support via support at pm.org pm_groups mailing list pm_groups at pm.org http://mail.pm.org/mailman/listinfo/pm_groups === End of Forwarded Message From adeltac at valueclick.com Mon Jul 10 06:53:06 2006 From: adeltac at valueclick.com (Aran Deltac) Date: Mon, 10 Jul 2006 06:53:06 -0700 Subject: [LA.pm] Damian Conway, Guest Presenter at TO.pm Message-ID: This coming Wednesday, July 12th, ValueClick Inc. has sponsored Dr. Damian Conway to speak at the Thousand Oaks Perl Mongers. Here is an overview of the talk that Damian will be conducting: ------------------- Extreme Perl - The Horror That Is SelfGOL In this talk Damian dissects the SelfGOL program: an obfuscated, self-aware, viral quine that can: * self-replicate, * rewrite other Perl programs to allow them to self- replicate, * detect un-rewritable Perl programs, * execute itself or other Perl programs as cellular automata of arbitrary size (to play Conway's "Game of Life"), * animate any short text as a cycling marquee banner. SelfGOL accomplishes these feats in under 1000 bytes of standard Perl, without importing any modules, and without using a single if, unless, while, until, for, foreach, goto, next, last, redo, map, or grep. To do all that in under 1K of code, it relies on some extreme programming techniques, and on many of the obscure backwaters of the Perl syntax. This talk explores both. In other words, it's everything you never wanted to know about Perl, and would have been afraid to ask. ------------------- The talk is scheduled for 7pm to 9pm. Bring your appetite, as pizza and drinks will be provided. More information about the event can be found on our site: http://thousand-oaks-perl.org/. Directions to the ValueClick office may be found here: http://thousand-oaks-perl.org/bin/view/Main/ValueClick. If you live in the LA basin please attend the event - WestLake is closer to LA than Thousand Oaks and the drive up here will be well worth it. Please RSVP to adeltac at valueclick.com if you plan on attending so that we get enough food and chairs for everyone! Thanks, TO.pm ------------------- More about Damian: Damian Conway holds a B.Sc. and a Ph.D. in Computer Science. A widely sought-after speaker and trainer, he is also the author of numerous well-known software modules including: Parse::RecDescent (a sophisticated parsing tool), Class::Contract (design-by-contract programming in Perl), Lingua::EN::Inflect (rule-based English transformations for text generation), Class::Multimethods (multiple dispatch polymorphism), Text::Autoformat (intelligent automatic reformatting of plaintext), Switch (Perl's missing case statement), NEXT (resumptive method dispatch), Filter::Simple (Perl-based source code manipulation), Quantum::Superpositions (auto-parallelization of serial code using a quantum mechanical metaphor), and Lingua::Romana::Perligata (programming in Latin). All of this software is available free from your local CPAN mirror. A well-known member of the international Perl community, Damian was the winner of the 1998, 1999, and 2000 Larry Wall Awards for Practical Utility. The best technical paper at the annual Perl Conference was subsequently named in his honour. He is a member of the technical committee for The Perl Conference, a keynote speaker at many Open Source conferences, a former columnist for "The Perl Journal", and author of the books "Object Oriented Perl" and "Perl Best Practices". In 2001 Damian received the first "Perl Foundation Development Grant" and spent 20 months working on projects for the betterment of Perl. -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/losangeles-pm/attachments/20060710/94fbf051/attachment.html From andy at petdance.com Mon Jul 10 08:38:20 2006 From: andy at petdance.com (Andy Lester) Date: Mon, 10 Jul 2006 10:38:20 -0500 Subject: [LA.pm] Damian Conway, Guest Presenter at TO.pm In-Reply-To: References: Message-ID: <5158999E-7DD7-4236-AB16-B73B9B595948@petdance.com> On Jul 10, 2006, at 8:53 AM, Aran Deltac wrote: > Extreme Perl ? The Horror That Is SelfGOL And plus, it's just a lot of fun to watch him explain this stuff. I found myself laughing in shock when he gave this talk to the Chicago Perl Mongers a few years back. Well worth your time to go see. -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From matt.follett at gmail.com Mon Jul 10 22:12:53 2006 From: matt.follett at gmail.com (Matt Follett) Date: Mon, 10 Jul 2006 22:12:53 -0700 Subject: [LA.pm] Damian Conway, Guest Presenter at TO.pm In-Reply-To: References: Message-ID: I am really new to the area but would like to go. Is there anyone in the Anaheim/Fullerton area planning to go to this that I could carpool with? thanks, Matt Follett On Jul 10, 2006, at 6:53 AM, Aran Deltac wrote: > This coming Wednesday, July 12th, ValueClick Inc. has sponsored Dr. > Damian Conway to speak at the Thousand Oaks Perl Mongers. Here is > an overview of the talk that Damian will be conducting: > > > > ------------------- > > Extreme Perl ? The Horror That Is SelfGOL > > > > In this talk Damian dissects the SelfGOL program: an obfuscated, > self-aware, viral quine that can: > > > > self-replicate, > rewrite other Perl programs to allow them to self- replicate, > detect un-rewritable Perl programs, > execute itself or other Perl programs as cellular automata of > arbitrary size (to play Conway's "Game of Life"), > animate any short text as a cycling marquee banner. > > > SelfGOL accomplishes these feats in under 1000 bytes of standard > Perl, without importing any modules, and without using a single if, > unless, while, until, for, foreach, goto, next, last, redo, map, or > grep. > > > > To do all that in under 1K of code, it relies on some extreme > programming techniques, and on many of the obscure backwaters of > the Perl syntax. This talk explores both. > > > > In other words, it's everything you never wanted to know about > Perl, and would have been afraid to ask. > > ------------------- > > > > The talk is scheduled for 7pm to 9pm. Bring your appetite, as > pizza and drinks will be provided. More information about the > event can be found on our site: http://thousand-oaks-perl.org/. > Directions to the ValueClick office may be found here: http:// > thousand-oaks-perl.org/bin/view/Main/ValueClick. If you live in > the LA basin please attend the event ? WestLake is closer to LA > than Thousand Oaks and the drive up here will be well worth it. > > > > Please RSVP to adeltac at valueclick.com if you plan on attending so > that we get enough food and chairs for everyone! > > > > Thanks, > > > > TO.pm > > > > ------------------- > > More about Damian: > > > > Damian Conway holds a B.Sc. and a Ph.D. in Computer Science. > > > > A widely sought-after speaker and trainer, he is also the author of > numerous well-known software modules including: Parse::RecDescent > (a sophisticated parsing tool), Class::Contract (design-by-contract > programming in Perl), Lingua::EN::Inflect (rule-based English > transformations for text generation), Class::Multimethods (multiple > dispatch polymorphism), Text::Autoformat (intelligent automatic > reformatting of plaintext), Switch (Perl's missing case statement), > NEXT (resumptive method dispatch), Filter::Simple (Perl-based > source code manipulation), Quantum::Superpositions (auto- > parallelization of serial code using a quantum mechanical > metaphor), and Lingua::Romana::Perligata (programming in Latin). > All of this software is available free from your local CPAN mirror. > > > > A well-known member of the international Perl community, Damian was > the winner of the 1998, 1999, and 2000 Larry Wall Awards for > Practical Utility. The best technical paper at the annual Perl > Conference was subsequently named in his honour. He is a member of > the technical committee for The Perl Conference, a keynote speaker > at many Open Source conferences, a former columnist for "The Perl > Journal", and author of the books "Object Oriented Perl" and "Perl > Best Practices". In 2001 Damian received the first "Perl Foundation > Development Grant" and spent 20 months working on projects for the > betterment of Perl. > > > > > > _______________________________________________ > Losangeles-pm mailing list > Losangeles-pm at pm.org > http://mail.pm.org/mailman/listinfo/losangeles-pm -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/losangeles-pm/attachments/20060710/7e68a276/attachment.html From Todd.Cranston-Cuebas at Ticketmaster.com Tue Jul 11 00:36:08 2006 From: Todd.Cranston-Cuebas at Ticketmaster.com (Todd Cranston-Cuebas) Date: Tue, 11 Jul 2006 00:36:08 -0700 Subject: [LA.pm] Cancelled Tech Talk - Randal - July 11th (TODAY) Message-ID: <71D28C8451BFD5119B2B00508BE26E640D403402@pasmail3.office.tmcs> I'm very sorry, but I have to cancel Randal's talk today. I realize that I didn't send any formal announcement of the event, but I did ask you to hold the date on your calendar and didn't want to cause any confusion. I apologize to all for the very late notice, but I was unable to secure the room and I'm off site this week. I was hoping to pull this together long distance but was plagued with technology snaffus and literally just got my email, etc. back up and running. Randal is aware of the cancellation and I hope that we can do this another time when he is in town. I'll update you on the next talk as soon as possible. Regards, Todd Todd Cranston-Cuebas Senior Technical Recruiter Ticketmaster 8800 W. Sunset Blvd. West Hollywood, CA 90069 Phone: (310) 360-2436; Mobile: (310) 422-3347 tcc at ticketmaster.com Available Ticketmaster Positions Join the Ticketmaster Job Network! Your dream job is just a click away... -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/losangeles-pm/attachments/20060711/eea8013b/attachment.html From adeltac at valueclick.com Tue Jul 11 13:52:47 2006 From: adeltac at valueclick.com (Aran Deltac) Date: Tue, 11 Jul 2006 13:52:47 -0700 Subject: [LA.pm] Reminder: RSVP Damian Conway Talk Message-ID: All, this is a reminder to send me (adeltac at valueclick.com) a quick e-mail if you plan to attend, or think you might attend, Dr. Damian Conway's "Extreme Perl - The Horror That Is SelfGOL" talk tomorrow, July 12th, from 7pm to 9pm in Westlake. This way I can plan the seating arrangements and order enough pizza and salad for everyone. Also, I've created a map at: http://thousand-oaks-perl.org/valueclick_map.jpg Just follow the pink line off of 101. Verbal directions: * From LA, take 101 North. * Take the Lindero Canyon exit. * Turn right on to Lindero Canyon. * Pass the first Russel Ranch Rd, stay on Lindero. * Turn right on the second Russel Ranch Rd. * Turn right at the first driveway after the Costco parking lot. * Find a parking space as close to the big "Perl Meeting" sign which will be out front. The doors will be propped open. * Follow the signs. More information about this event can be found at: http://thousand-oaks-perl.org/ Aran -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/losangeles-pm/attachments/20060711/e54db53c/attachment.html From lapm at veggiechinese.net Wed Jul 26 22:30:00 2006 From: lapm at veggiechinese.net (William Yardley) Date: Wed, 26 Jul 2006 22:30:00 -0700 Subject: [LA.pm] time conversion question Message-ID: <20060727053000.GA10558@mitch.veggiechinese.net> I have a question about converting times... if I have a timestamp like the one on an email message: Mon, 24 Jul 2006 14:28:24 -0500 (CDT) Mon, 24 Jul 2006 15:28:41 -0400 (EDT) Mon, 24 Jul 2006 12:28:28 -0700 (etc.) is there an efficient / simple way to normalize this to (my) localtime in a format for a MySQL timestamp (0000-00-00 00:00:00) without converting to a GMT epoch timestamp and back to localtime in "normal" format? so far, I have something like: use Time::Local; my (undef,$day,$mon,$year,$time,$offset) = split(/\s+/,$report->get('arrival-date')); my ($hour,$min,$sec) = split(/:/,$time); # maybe needless to convert to epoch and back, but I can't # think of a better way to do it my $gmtime = timegm($sec,$min,$hour,$day,$mon,$year); # is this right? $gmtime += (($offset/100)*60*60); then convert back and format... Is there something that will do what I want for me? w From ehammond at thinksome.com Wed Jul 26 23:26:06 2006 From: ehammond at thinksome.com (Eric Hammond) Date: Wed, 26 Jul 2006 23:26:06 -0700 Subject: [LA.pm] time conversion question In-Reply-To: <20060727053000.GA10558@mitch.veggiechinese.net> References: <20060727053000.GA10558@mitch.veggiechinese.net> Message-ID: <20060727062606.GA7176@level22.com> William Yardley wrote: > is there an efficient / simple way to normalize this to (my) localtime > in a format for a MySQL timestamp (0000-00-00 00:00:00) without "Efficient" is relative. Here's simple: #!/usr/bin/perl -w use strict; use Date::Manip; while ( my $sometime = ) { my $datetime = UnixDate(ParseDateString($sometime), '%Y-%m-%d %H:%M:%S'); print "$datetime <= $sometime"; } __DATA__ Mon, 24 Jul 2006 14:28:24 -0500 (CDT) Mon, 24 Jul 2006 15:28:41 -0400 (EDT) Mon, 24 Jul 2006 12:28:28 -0700 Output (in a US Pacific time zone): 2006-07-24 12:28:24 <= Mon, 24 Jul 2006 14:28:24 -0500 (CDT) 2006-07-24 12:28:41 <= Mon, 24 Jul 2006 15:28:41 -0400 (EDT) 2006-07-24 12:28:28 <= Mon, 24 Jul 2006 12:28:28 -0700 The two lines you care about are: use Date::Manip; UnixDate(ParseDateString(...), '%Y-%m-%d %H:%M:%S') (I don't know anybody who calls Date::Manip efficient except in terms of programmer resources, but it sure is convenient.) -- Eric Hammond ehammond at thinksome.com From lapm at veggiechinese.net Thu Jul 27 00:51:50 2006 From: lapm at veggiechinese.net (William Yardley) Date: Thu, 27 Jul 2006 00:51:50 -0700 Subject: [LA.pm] time conversion question In-Reply-To: <20060727062606.GA7176@level22.com> References: <20060727053000.GA10558@mitch.veggiechinese.net> <20060727062606.GA7176@level22.com> Message-ID: <20060727075150.GB10558@mitch.veggiechinese.net> On Wed, Jul 26, 2006 at 11:26:06PM -0700, Eric Hammond wrote: > William Yardley wrote: > > is there an efficient / simple way to normalize this to (my) localtime > > in a format for a MySQL timestamp (0000-00-00 00:00:00) without > "Efficient" is relative. Here's simple: > > #!/usr/bin/perl -w > use strict; > use Date::Manip; > while ( my $sometime = ) { > my $datetime = UnixDate(ParseDateString($sometime), '%Y-%m-%d %H:%M:%S'); > print "$datetime <= $sometime"; [...] Thanks - this is exactly what I was looking for. > (I don't know anybody who calls Date::Manip efficient except in > terms of programmer resources, but it sure is convenient.) Yeah, and the resulting code is a lot easier to understand, and probably more tolerant of weird date strings. w From Peter at psdt.com Thu Jul 27 16:42:21 2006 From: Peter at psdt.com (Peter Scott) Date: Thu, 27 Jul 2006 16:42:21 -0700 Subject: [LA.pm] time conversion question In-Reply-To: <20060727062606.GA7176@level22.com> References: <20060727053000.GA10558@mitch.veggiechinese.net> <20060727062606.GA7176@level22.com> Message-ID: At 11:26 PM -0700 7/26/06, Eric Hammond wrote: >William Yardley wrote: >> is there an efficient / simple way to normalize this to (my) localtime >> in a format for a MySQL timestamp (0000-00-00 00:00:00) without > >"Efficient" is relative. Here's simple: > > #!/usr/bin/perl -w > use strict; > use Date::Manip; > while ( my $sometime = ) { > my $datetime = UnixDate(ParseDateString($sometime), '%Y-%m-%d %H:%M:%S'); > print "$datetime <= $sometime"; > } [...] >(I don't know anybody who calls Date::Manip efficient except in >terms of programmer resources, but it sure is convenient.) I use Date::Parse, which is more lightweight than Date::Manip, and then use strftime for the reformatting. Just TMTOWTDI: use Date::Parse; use POSIX qw(strftime); # ... my $datetime = strftime('%Y-%m-%d %H:%M:%S', str2time($sometime)); From lapm at veggiechinese.net Thu Jul 27 21:31:50 2006 From: lapm at veggiechinese.net (William Yardley) Date: Thu, 27 Jul 2006 21:31:50 -0700 Subject: [LA.pm] time conversion question In-Reply-To: References: <20060727053000.GA10558@mitch.veggiechinese.net> <20060727062606.GA7176@level22.com> Message-ID: <20060728043150.GA18224@mitch.veggiechinese.net> On Thu, Jul 27, 2006 at 04:42:21PM -0700, Peter Scott wrote: > At 11:26 PM -0700 7/26/06, Eric Hammond wrote: > > William Yardley wrote: > >> is there an efficient / simple way to normalize this to (my) localtime > >> in a format for a MySQL timestamp (0000-00-00 00:00:00) without > [...] > > (I don't know anybody who calls Date::Manip efficient except in > > terms of programmer resources, but it sure is convenient.) > I use Date::Parse, which is more lightweight than Date::Manip, and > then use strftime for the reformatting. Just TMTOWTDI: > > use Date::Parse; > use POSIX qw(strftime); > # ... > my $datetime = strftime('%Y-%m-%d %H:%M:%S', str2time($sometime)); After messing with it a little and looking at TFM, looks like that should be: strftime('%Y-%m-%d %H:%M:%S', localtime(str2time($date))); It does seem faster (even on a single calculation) and a bit more robust at dealing with comments. w From Peter at psdt.com Fri Jul 28 13:08:10 2006 From: Peter at psdt.com (Peter Scott) Date: Fri, 28 Jul 2006 13:08:10 -0700 Subject: [LA.pm] time conversion question In-Reply-To: <20060728043150.GA18224@mitch.veggiechinese.net> References: <20060727053000.GA10558@mitch.veggiechinese.net> <20060727062606.GA7176@level22.com> <20060728043150.GA18224@mitch.veggiechinese.net> Message-ID: At 9:31 PM -0700 7/27/06, William Yardley wrote: > > my $datetime = strftime('%Y-%m-%d %H:%M:%S', str2time($sometime)); > >After messing with it a little and looking at TFM, looks like that >should be: > >strftime('%Y-%m-%d %H:%M:%S', localtime(str2time($date))); Right, I always forget that. Seems like it shouldn't be necessary :-) From pete at peterbenjamin.com Fri Jul 28 15:03:07 2006 From: pete at peterbenjamin.com (Peter Benjamin) Date: Fri, 28 Jul 2006 15:03:07 -0700 Subject: [LA.pm] time conversion question In-Reply-To: References: <20060727053000.GA10558@mitch.veggiechinese.net> <20060727062606.GA7176@level22.com> Message-ID: <6.2.5.6.2.20060728150152.04876418@peterbenjamin.com> MySQL will reformat dates it outputs. It has an extensive set of input and output formats. And I've been told it is faster than perl's date handling. From merlyn at stonehenge.com Sat Jul 29 09:19:48 2006 From: merlyn at stonehenge.com (Randal L. Schwartz) Date: 29 Jul 2006 09:19:48 -0700 Subject: [LA.pm] possible dates for my "Perl Best Practices" talk Message-ID: <86odv88jtn.fsf@blue.stonehenge.com> I'm in town from the 2nd to the 16th. If you can find a room for me, I'd be happy to present "Perl Best Practices", an hour talk extracted from Damian's book of the same name. Tuesdays would be best, as my Sunday and Monday nights are spoken for (karaoke at www.sardosbar.com). -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!