From pjf at perltraining.com.au Mon Sep 7 18:06:34 2009 From: pjf at perltraining.com.au (Paul Fenwick) Date: Tue, 08 Sep 2009 11:06:34 +1000 Subject: [Melbourne-pm] 40% discount on next week's course - Programming Perl Message-ID: <4AA5AE1A.9000503@perltraining.com.au> G'day Melbourne.pm, As a one-time offer, I'd like to invite the Melbourne Perl Mongers to attend our Programming Perl course next week at a 40% discount. That's 4 days of training for only $1500 (GST inclusive). The course runs from Tuesday 15th September - Friday 18th September with each day fully catered. You'll get a bound copy of our course notes, a CD containing all the exercises, answers, and software used in the course, and of course a really good grounding in Perl. If you already know Perl (as I expect you do), then please mention this to your less knowledgeable co-workers. Book before noon Thursday, 10th September, and quote "40% Melbourne.pm" in your booking referrer field to take advantage of this offer. No other discounts or specials apply with this offer. Places available for this offer are limited. You can find out more about the course contents at: http://perltraining.com.au/courses/programmingperl.html Bookings can be made via our bookings page at: http://perltraining.com.au/bookings/Melbourne.html All the best, Paul -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 From jarich at perltraining.com.au Mon Sep 7 19:19:46 2009 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Tue, 08 Sep 2009 12:19:46 +1000 Subject: [Melbourne-pm] Top 100 fail debugging/testing party tomorrow night: 9th September 2009 Message-ID: <4AA5BF42.2040002@perltraining.com.au> G'day folk, You need not have any experience in debugging, working with CPAN, using these modules, testing in Perl or any of those kinds of things to participate in this event. One of the aims of this event is to help you learn these skills. This is a reminder that tomorrow's Melbourne Perl Mongers meeting is a debugging/testing party. Our meeting will be kindly hosted by Remasys Pty Ltd Level 1 172 Flinders St (just opposite Federation Square) Map: http://preview.tinyurl.com/6sa7l8 and will start at 6:30pm. Please arrive early/on time or have a mobile phone with you from which you can call the number on the door to be let in. The idea is that we're going to take a few modules from the top 100 fail list that Adam Kennedy has put together and see if we can fix any of the bugs. The list can be found at: http://ali.as/top100/ (see the FAIL 100 tab) Click the module name to go through to the cpan distribution page and then to the testers reports to see what kinds of tests are failing and on what version of Perl and on what operating systems. The bugs we are able to fix depends on us being able to reproduce them. :) I suggest that we work in teams of 2-4 people so that we can share our knowledge of testing and debugging. If you have a particular module from that list that you'd like to try to work on, please nominate the following: Module name Module version Platform Perl version in a reply to the group. If the author has a code repository it would be cool to note that too. At the end of the meeting we'll assess how well we did and nominate people from each group to handle creating any patches and submitting them to RT or whatever the author prefers. All the best, J From alecclews at gmail.com Mon Sep 7 21:17:05 2009 From: alecclews at gmail.com (Alec Clews) Date: Tue, 8 Sep 2009 14:17:05 +1000 Subject: [Melbourne-pm] Top 100 fail debugging/testing party tomorrow night: 9th September 2009 In-Reply-To: <4AA5BF42.2040002@perltraining.com.au> References: <4AA5BF42.2040002@perltraining.com.au> Message-ID: <3c2b63c00909072117i502d77c0l387a930d91e54a61@mail.gmail.com> There is a page on the perl net wiki for this project http://perl.net.au/wiki/Melbourne_Fail_100_Project 2009/9/8 Jacinta Richardson : > G'day folk, > > You need not have any experience in debugging, working with CPAN, using > these modules, testing in Perl or any of those kinds of things to > participate in this event. ?One of the aims of this event is to help you > learn these skills. > > This is a reminder that tomorrow's Melbourne Perl Mongers meeting is a > debugging/testing party. ?Our meeting will be kindly hosted by > > ? ? ? ?Remasys Pty Ltd > ? ? ? ?Level 1 > ? ? ? ?172 Flinders St > ? ? ? ?(just opposite Federation Square) > ? ? ? ?Map: http://preview.tinyurl.com/6sa7l8 > > and will start at 6:30pm. ?Please arrive early/on time or have a mobile > phone with you from which you can call the number on the door to be let in. > > The idea is that we're going to take a few modules from the top 100 fail > list that Adam Kennedy has put together and see if we can fix any of the > bugs. ?The list can be found at: > > ? ? ? ?http://ali.as/top100/ ?(see the FAIL 100 tab) > > Click the module name to go through to the cpan distribution page and then > to the testers reports to see what kinds of tests are failing and on what > version of Perl and on what operating systems. ?The bugs we are able to fix > depends on us being able to reproduce them. ?:) > > I suggest that we work in teams of 2-4 people so that we can share our > knowledge of testing and debugging. ?If you have a particular module from > that list that you'd like to try to work on, please nominate the following: > > ? ? ? ?Module name > ? ? ? ?Module version > ? ? ? ?Platform > ? ? ? ?Perl version > > in a reply to the group. ?If the author has a code repository it would be > cool to note that too. > > At the end of the meeting we'll assess how well we did and nominate people > from each group to handle creating any patches and submitting them to RT or > whatever the author prefers. > > All the best, > > ? ? ? ?J > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm > -- Alec Clews Personal Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From pat at patspam.com Tue Sep 8 13:13:36 2009 From: pat at patspam.com (Patrick Donelan) Date: Tue, 8 Sep 2009 15:13:36 -0500 Subject: [Melbourne-pm] Top 100 fail debugging/testing party tomorrow night: 9th September 2009 In-Reply-To: <4AA5BF42.2040002@perltraining.com.au> References: <4AA5BF42.2040002@perltraining.com.au> Message-ID: <42321ee20909081313q69b8d90fkf1ff21381bbc4c84@mail.gmail.com> Good luck to all! Hope it's a huge success and you decide to have a second one so that I can attend after I get back from the WebGUI conference. Patrick http://patspam.com On Mon, Sep 7, 2009 at 9:19 PM, Jacinta Richardson < jarich at perltraining.com.au> wrote: > G'day folk, > > You need not have any experience in debugging, working with CPAN, using > these modules, testing in Perl or any of those kinds of things to > participate in this event. One of the aims of this event is to help you > learn these skills. > > This is a reminder that tomorrow's Melbourne Perl Mongers meeting is a > debugging/testing party. Our meeting will be kindly hosted by > > Remasys Pty Ltd > Level 1 > 172 Flinders St > (just opposite Federation Square) > Map: http://preview.tinyurl.com/6sa7l8 > > and will start at 6:30pm. Please arrive early/on time or have a mobile > phone with you from which you can call the number on the door to be let in. > > The idea is that we're going to take a few modules from the top 100 fail > list that Adam Kennedy has put together and see if we can fix any of the > bugs. The list can be found at: > > http://ali.as/top100/ (see the FAIL 100 tab) > > Click the module name to go through to the cpan distribution page and then > to the testers reports to see what kinds of tests are failing and on what > version of Perl and on what operating systems. The bugs we are able to fix > depends on us being able to reproduce them. :) > > I suggest that we work in teams of 2-4 people so that we can share our > knowledge of testing and debugging. If you have a particular module from > that list that you'd like to try to work on, please nominate the following: > > Module name > Module version > Platform > Perl version > > in a reply to the group. If the author has a code repository it would be > cool to note that too. > > At the end of the meeting we'll assess how well we did and nominate people > from each group to handle creating any patches and submitting them to RT or > whatever the author prefers. > > All the best, > > J > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From lsharpe at pacificwireless.com.au Tue Sep 8 18:29:38 2009 From: lsharpe at pacificwireless.com.au (Leigh Sharpe) Date: Wed, 9 Sep 2009 11:29:38 +1000 Subject: [Melbourne-pm] Sept Fail 100 Bug Squash References: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com> <4A927B98.5060308@aapt.net.au> Message-ID: <96CF49BD8B56384395D698BA99007FA347A55E@exchange.pacwire.local> From: melbourne-pm-bounces+lsharpe=pacificwireless.com.au at pm.org [mailto:melbourne-pm-bounces+lsharpe=pacificwireless.com.au at pm.org] On Behalf Of David Dick > And does anyone have a laptop that cannot handle wireless? Should we provide ethernet as well as wireless connectivity? I'll have a handful of PCMCIA WiFi cards if anybody needs one. From pjf at perltraining.com.au Tue Sep 8 20:52:49 2009 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed, 09 Sep 2009 13:52:49 +1000 Subject: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm In-Reply-To: <4AA5BF42.2040002@perltraining.com.au> References: <4AA5BF42.2040002@perltraining.com.au> Message-ID: <4AA72691.8080003@perltraining.com.au> G'day Everyone, Reminder for tonight's meeting: When: TONIGHT, 9th September, 6:30pm Where: Remasys Pty Ltd Level 1 180 Flinders St MELBOURNE VIC 3121 What: The Great Melbourne Perl Mongers Bug Squash! I've had a brief chat to Adam Kennedy about potential modules in need of bug-squashing. He's actually come up with some fantastic suggestions. If you look at the *Volatile 100* (not the FAIL 100) list at: http://ali.as/top100/ You'll notice there's a big plateau which then drops off. That plateau are essentially the modules used to install code from the CPAN. If they fail, then everything is broken downstream. Adam suggested the triaging bugs in that list in particular would go a long way to making everything else work better. In particular, "bugs" will tend to fall into one of three categories: * A real bug * A false positive that can be fixed * A broken system The third ones we can't do much about, but the first two we can. Real bugs can potentially be patched, and false positives can often be worked around (you're on X which acts funny with Y, we'll skip tests Z). We can triage bugs without needing the systems they appear on, which makes things easier from an architecture standpoint. Adam also suggested three modules in the FAIL 100 that are known to be in need of attention: * FCGI * Test::Class * List::MoreUtils (requires C programming skills) I'm afraid I'm going to be swamped with work for the rest of the day, so I won't be able to do much digging in depth, but this does give us a start for tonight's meeting, which may be meta-bug-squashing (finding the bugs that can be squashed). I also have a list of bugs and improvements needed for autodie that's about as long as my arm, should anyone want them. ;) See you all tonight, Paul -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 From alecclews at gmail.com Tue Sep 8 21:34:36 2009 From: alecclews at gmail.com (Alec Clews) Date: Wed, 9 Sep 2009 14:34:36 +1000 Subject: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm In-Reply-To: <4AA72691.8080003@perltraining.com.au> References: <4AA5BF42.2040002@perltraining.com.au> <4AA72691.8080003@perltraining.com.au> Message-ID: <3c2b63c00909082134n21ce4e10he21cf53bb2a1c5b6@mail.gmail.com> Notes added to http://perl.net.au/wiki/Melbourne_Fail_100_Project Please add your details 2009/9/9 Paul Fenwick : > G'day Everyone, > > Reminder for tonight's meeting: > > ? When: ? TONIGHT, 9th September, 6:30pm > > ? Where: ?Remasys Pty Ltd > ? ? ? ? ? Level 1 > ? ? ? ? ? 180 Flinders St > ? ? ? ? ? MELBOURNE VIC 3121 > > ? What: ? The Great Melbourne Perl Mongers Bug Squash! > > I've had a brief chat to Adam Kennedy about potential modules in need of > bug-squashing. ?He's actually come up with some fantastic suggestions. > > If you look at the *Volatile 100* (not the FAIL 100) list at: > > ? ? ? ?http://ali.as/top100/ > > You'll notice there's a big plateau which then drops off. ?That plateau are > essentially the modules used to install code from the CPAN. ?If they fail, > then everything is broken downstream. > > Adam suggested the triaging bugs in that list in particular would go a long > way to making everything else work better. ?In particular, "bugs" will tend > to fall into one of three categories: > > ? ? ? ?* A real bug > ? ? ? ?* A false positive that can be fixed > ? ? ? ?* A broken system > > The third ones we can't do much about, but the first two we can. ?Real bugs > can potentially be patched, and false positives can often be worked around > (you're on X which acts funny with Y, we'll skip tests Z). ?We can triage > bugs without needing the systems they appear on, which makes things easier > from an architecture standpoint. > > Adam also suggested three modules in the FAIL 100 that are known to be in > need of attention: > > ?* FCGI > ?* Test::Class > ?* List::MoreUtils (requires C programming skills) > > I'm afraid I'm going to be swamped with work for the rest of the day, so I > won't be able to do much digging in depth, but this does give us a start for > tonight's meeting, which may be meta-bug-squashing (finding the bugs that > can be squashed). > > I also have a list of bugs and improvements needed for autodie that's about > as long as my arm, should anyone want them. ?;) > > See you all tonight, > > ? ? ? ?Paul > > -- > Paul Fenwick | http://perltraining.com.au/ > Director of Training ? ? ? ? ? ? ? ? ? | Ph: ?+61 3 9354 6001 > Perl Training Australia ? ? ? ? ? ? ? ?| Fax: +61 3 9354 2681 > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm > -- Alec Clews Personal Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From jarich at perltraining.com.au Tue Sep 8 22:35:04 2009 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Wed, 09 Sep 2009 15:35:04 +1000 Subject: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm In-Reply-To: <4AA72691.8080003@perltraining.com.au> References: <4AA5BF42.2040002@perltraining.com.au> <4AA72691.8080003@perltraining.com.au> Message-ID: <4AA73E88.9020202@perltraining.com.au> Paul Fenwick wrote: > * FCGI (FCGI 0.67) Systems and Perl versions cygwin: 5.10.0 linux: 5.10.0, 5.8.9, 5.8.8, 5.8.7, 5.6.2 solaris: 5.10.0 > * Test::Class (Test-Class 0.32_1) MSWin32 No test reports at all cygwin: No test reports at all freebsd: 5.10.1, 5.10.0, 5.8.9, 5.8.8, 5.6.2 linux: 5.10.1, 5.10.0, 5.8.9, 5.8.8 netbsd: 5.10.0 solaris: 5.10.1 > * List::MoreUtils (requires C programming skills) Developer release: 0.25_2 freebsd: 5.6.2 linux: 5.6.2 Latest distribution (0.22 (2nd July 2006)) according to META.yml: MSWin32: 5.10.0, 5.8.6 linux: 5.10.0, 5.8.9, 5.8.8, 5.8.6 mirbsd: 5.10.0, 5.8.9, 5.8.8 openbsd: 5.10.0, 5.8.9, 5.8.8 It looks like linux with Perl 5.10.0 and 5.8.9 is a good candidate platform for these and other modules for testing. Otherwise Windows with cygwin and Perl 5.10.0 All the best, J -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +61 3 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact at perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | From Martin.G.Ryan at team.telstra.com Tue Sep 8 22:45:45 2009 From: Martin.G.Ryan at team.telstra.com (Ryan, Martin G) Date: Wed, 9 Sep 2009 15:45:45 +1000 Subject: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm In-Reply-To: <4AA73E88.9020202@perltraining.com.au> References: <4AA5BF42.2040002@perltraining.com.au> <4AA72691.8080003@perltraining.com.au> <4AA73E88.9020202@perltraining.com.au> Message-ID: <589EE331794E0B4DA62A9ADE89BCB4057CA895D8B4@WSMSG3103V.srv.dir.telstra.com> Is Strawberry a different beast to Cygwin? -----Original Message----- From: melbourne-pm-bounces+martin.g.ryan=team.telstra.com at pm.org [mailto:melbourne-pm-bounces+martin.g.ryan=team.telstra.com at pm.org] On Behalf Of Jacinta Richardson Sent: Wednesday, 9 September 2009 3:35 PM To: Melbourne Perlmongers Subject: Re: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm Paul Fenwick wrote: > * FCGI (FCGI 0.67) Systems and Perl versions cygwin: 5.10.0 linux: 5.10.0, 5.8.9, 5.8.8, 5.8.7, 5.6.2 solaris: 5.10.0 > * Test::Class (Test-Class 0.32_1) MSWin32 No test reports at all cygwin: No test reports at all freebsd: 5.10.1, 5.10.0, 5.8.9, 5.8.8, 5.6.2 linux: 5.10.1, 5.10.0, 5.8.9, 5.8.8 netbsd: 5.10.0 solaris: 5.10.1 > * List::MoreUtils (requires C programming skills) Developer release: 0.25_2 freebsd: 5.6.2 linux: 5.6.2 Latest distribution (0.22 (2nd July 2006)) according to META.yml: MSWin32: 5.10.0, 5.8.6 linux: 5.10.0, 5.8.9, 5.8.8, 5.8.6 mirbsd: 5.10.0, 5.8.9, 5.8.8 openbsd: 5.10.0, 5.8.9, 5.8.8 It looks like linux with Perl 5.10.0 and 5.8.9 is a good candidate platform for these and other modules for testing. Otherwise Windows with cygwin and Perl 5.10.0 All the best, J -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +61 3 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact at perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | _______________________________________________ Melbourne-pm mailing list Melbourne-pm at pm.org http://mail.pm.org/mailman/listinfo/melbourne-pm From sgc294 at internode.on.net Tue Sep 8 23:01:58 2009 From: sgc294 at internode.on.net (andrew Dent) Date: Wed, 09 Sep 2009 16:01:58 +1000 Subject: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm In-Reply-To: <589EE331794E0B4DA62A9ADE89BCB4057CA895D8B4@WSMSG3103V.srv.dir.telstra.com> References: <4AA5BF42.2040002@perltraining.com.au> <4AA72691.8080003@perltraining.com.au> <4AA73E88.9020202@perltraining.com.au> <589EE331794E0B4DA62A9ADE89BCB4057CA895D8B4@WSMSG3103V.srv.dir.telstra.com> Message-ID: <4AA744D6.9020808@internode.on.net> I'm on Strawberry as well. Ryan, Martin G wrote: > Is Strawberry a different beast to Cygwin? > > -----Original Message----- > From: melbourne-pm-bounces+martin.g.ryan=team.telstra.com at pm.org [mailto:melbourne-pm-bounces+martin.g.ryan=team.telstra.com at pm.org] On Behalf Of Jacinta Richardson > Sent: Wednesday, 9 September 2009 3:35 PM > To: Melbourne Perlmongers > Subject: Re: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm > > Paul Fenwick wrote: > > >> * FCGI (FCGI 0.67) >> > > Systems and Perl versions > > cygwin: 5.10.0 > linux: 5.10.0, 5.8.9, 5.8.8, 5.8.7, 5.6.2 > solaris: 5.10.0 > > >> * Test::Class (Test-Class 0.32_1) >> > > MSWin32 No test reports at all > cygwin: No test reports at all > > freebsd: 5.10.1, 5.10.0, 5.8.9, 5.8.8, 5.6.2 > linux: 5.10.1, 5.10.0, 5.8.9, 5.8.8 > netbsd: 5.10.0 > solaris: 5.10.1 > > >> * List::MoreUtils (requires C programming skills) >> > > Developer release: 0.25_2 > > freebsd: 5.6.2 > linux: 5.6.2 > > Latest distribution (0.22 (2nd July 2006)) according to META.yml: > > MSWin32: 5.10.0, 5.8.6 > linux: 5.10.0, 5.8.9, 5.8.8, 5.8.6 > mirbsd: 5.10.0, 5.8.9, 5.8.8 > openbsd: 5.10.0, 5.8.9, 5.8.8 > > > It looks like linux with Perl 5.10.0 and 5.8.9 is a good candidate platform for > these and other modules for testing. Otherwise Windows with cygwin and Perl 5.10.0 > > All the best, > > J > > > From pjf at perltraining.com.au Tue Sep 8 23:21:21 2009 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed, 09 Sep 2009 16:21:21 +1000 Subject: [Melbourne-pm] Top 100 fail bug-squash, TONIGHT, 6:30pm In-Reply-To: <589EE331794E0B4DA62A9ADE89BCB4057CA895D8B4@WSMSG3103V.srv.dir.telstra.com> References: <4AA5BF42.2040002@perltraining.com.au> <4AA72691.8080003@perltraining.com.au> <4AA73E88.9020202@perltraining.com.au> <589EE331794E0B4DA62A9ADE89BCB4057CA895D8B4@WSMSG3103V.srv.dir.telstra.com> Message-ID: <4AA74961.2030607@perltraining.com.au> Ryan, Martin G wrote: > Is Strawberry a different beast to Cygwin? A very different beast. Cygwin is essentially a Unix-like compatibility layer. So Cygwin Perl usually gets all the bugs in Windows, *and* all the bugs in Unix. ;) In my (very extensive!) Cygwin Perl experience, it's much more Unix-like than Windows-like, but contains enough differences to regularly get in trouble. For the last couple of years, Cygwin was my primary Perl platform[1]. Cygwin can be installed alongside Strawberry Perl, and there's no interaction between them. They can happily exist side-by-side. All the best, Paul [1] With me now having a new laptop, I'm back on Linux. -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 From alec.clews at gmail.com Wed Sep 9 18:32:56 2009 From: alec.clews at gmail.com (Alec Clews) Date: Thu, 10 Sep 2009 11:32:56 +1000 Subject: [Melbourne-pm] MelPM at Software Freedom day Message-ID: <3c2b63c00909091832g1454b793r4cb18e89f728dea3@mail.gmail.com> Perl Mongers has obtained a desk at Software Freedom on Saturday. Can I get volunteers to assist please? Pretty easy -- just pitch up for however long you can and be prepared to chat to people about about Perl and Open Source Software. See http://www.softwarefreedomday.org/melb for details. Please sign up at http://perl.net.au/wiki/Melbourne_Software_Freedom_day Thanks -- Alec Clews Personal Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From rob at cataclysm.cx Fri Sep 11 02:05:45 2009 From: rob at cataclysm.cx (Robert Norris) Date: Fri, 11 Sep 2009 19:05:45 +1000 Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string Message-ID: <20090911090544.GA23111@pyro.home> Hi all, I'm currently fixing a few bugs in Mail::IMAPClient that for whatever reason have gone unnoticed. One of these is that its fetch_hash() method can't handle a parenthesized value if contains parentheses. In other words, its not dealing with nested parentheses correctly. A typical server response to a FETCH command might look something like this: * 2 FETCH (UID 2 FLAGS (\Answered \Seen) INTERNALDATE "05-Jun-2008 07:19:01 +1000" RFC822.SIZE 5144 BODYSTRUCTURE ("text" "plain" ("charset" "ISO-8859-1") NIL NIL "7bit" 2053 46 NIL ("inline" NIL) NIL NIL)) fetch_hash() seeks to turn that into the following hash: "UID" => "2", "FLAGS" => "\Answered \Seen", "INTERNALDATE" => "05-Jun-2008 07:19:01 +1000", "RFC822.SIZE" => "5144", "BODYSTRUCTURE" => "text" "plain" ("charset" "ISO-8859-1") NIL NIL "7bit" 2053 46 NIL ("inline" NIL) NIL NIL", In other words, the response data consists of key/value pairs. The values are either simple strings (matched by \S+), quoted strings (matched by "[^"]*") or a parenthesized fragment, which may include parentheses itself. What's inside the parentheses is actually completely opaque as far as this method is concerned. The original code used \([\)]*\) to try and match it, which works great until there is a closing paren inside. My attempt is based on mjd's regex to match balanced parentheses here: http://perl.plover.com/yak/regex/samples/slide083.html This is what I have so far for matching/capturing the parenthesized fragment. Its actually part of a larger regex that matches the other stuff described above, but this doesn't work in isolation either so I don't think those things are affecting it: (?: (?{ local $d=0 }) # set depth to 0 ( # start capture (?: \( # opening paren (?{$d++}) # increment the depth | \) # or closing paren (?{$d--}) # decrement the depth (?(?{$d==0}) # if we're back to the start (*ACCEPT) # we're done ) | (?>[^()]*) # or there's just some normal text )* (?(?{$d!=0}) # done. did we reach a matching closing paren (?!) # nope, failed ) ) # end capture ) Running a basic test program with -Mre=debug seems to suggest that this is doing something close to what I want, stopping when it gets to the correct closing paren. The only problem is that nothing gets captured, even though the description of (*ACCEPT) in perlre makes it sound like it should. So, what's wrong here? And is there an easier way to do this? Note that I'm restricted to Perl 5.6, which sucks as I'd really like to try the PARNO stuff that came with 5.10. Thanks, Rob. From sam at nipl.net Fri Sep 11 05:36:29 2009 From: sam at nipl.net (Sam Watkins) Date: Fri, 11 Sep 2009 22:36:29 +1000 Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string In-Reply-To: <20090911090544.GA23111@pyro.home> References: <20090911090544.GA23111@pyro.home> Message-ID: <20090911123629.GA13362@nipl.net> On Fri, Sep 11, 2009 at 07:05:45PM +1000, Robert Norris wrote: > So, what's wrong here? And is there an easier way to do this? Note that > I'm restricted to Perl 5.6, which sucks as I'd really like to try the > PARNO stuff that came with 5.10. I think normal regexps aren't the right tool for this, you can do it easily in a couple of lines of C, but that method would be somewhat slow in perl. But given that you're dealing with IMAP, the network is going to be a lot slower, so you might as well just do it with a for loop over the characters and count parentheses, rather than some totally obscure regexp hack. Sam From wayland at wayland.id.au Fri Sep 11 18:58:42 2009 From: wayland at wayland.id.au (Timothy S. Nelson) Date: Sat, 12 Sep 2009 11:58:42 +1000 (EST) Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string In-Reply-To: <20090911123629.GA13362@nipl.net> References: <20090911090544.GA23111@pyro.home> <20090911123629.GA13362@nipl.net> Message-ID: On Fri, 11 Sep 2009, Sam Watkins wrote: > On Fri, Sep 11, 2009 at 07:05:45PM +1000, Robert Norris wrote: >> So, what's wrong here? And is there an easier way to do this? Note that >> I'm restricted to Perl 5.6, which sucks as I'd really like to try the >> PARNO stuff that came with 5.10. > > I think normal regexps aren't the right tool for this, you can do it > easily in a couple of lines of C, but that method would be somewhat slow > in perl. But given that you're dealing with IMAP, the network is going > to be a lot slower, so you might as well just do it with a for loop over > the characters and count parentheses, rather than some totally obscure > regexp hack. Incidentally, this is something that Perl 6 will solve. Because it has grammars. You could use Parse::RecDescent and an IMAP grammar, but that would be overkill in a P5 situation. P6 on the other hand... :). --------------------------------------------------------------------- | Name: Tim Nelson | Because the Creator is, | | E-mail: wayland at wayland.id.au | I am | --------------------------------------------------------------------- ----BEGIN GEEK CODE BLOCK---- Version 3.12 GCS d+++ s+: a- C++$ U+++$ P+++$ L+++ E- W+ N+ w--- V- PE(+) Y+>++ PGP->+++ R(+) !tv b++ DI++++ D G+ e++>++++ h! y- -----END GEEK CODE BLOCK----- From daniel at rimspace.net Fri Sep 11 18:55:22 2009 From: daniel at rimspace.net (Daniel Pittman) Date: Sat, 12 Sep 2009 11:55:22 +1000 Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string In-Reply-To: <20090911123629.GA13362@nipl.net> (Sam Watkins's message of "Fri, 11 Sep 2009 22:36:29 +1000") References: <20090911090544.GA23111@pyro.home> <20090911123629.GA13362@nipl.net> Message-ID: <87d45x9bat.fsf@rimspace.net> Sam Watkins writes: > On Fri, Sep 11, 2009 at 07:05:45PM +1000, Robert Norris wrote: > >> So, what's wrong here? And is there an easier way to do this? Note that >> I'm restricted to Perl 5.6, which sucks as I'd really like to try the >> PARNO stuff that came with 5.10. > > I think normal regexps aren't the right tool for this, you can do it easily > in a couple of lines of C, but that method would be somewhat slow in perl. My experience is that for small data it probably won't be practically slower. > But given that you're dealing with IMAP, the network is going to be a lot > slower, so you might as well just do it with a for loop over the characters > and count parentheses, rather than some totally obscure regexp hack. I would advise either Text::Balanced, or a real parser, for processing the IMAP response. Regards, Daniel -- ? Daniel Pittman ? daniel at rimspace.net ? +61 401 155 707 ? made with 100 percent post-consumer electrons Looking for work? Love Perl? In Melbourne, Australia? We are hiring. From daniel at rimspace.net Fri Sep 11 20:22:21 2009 From: daniel at rimspace.net (Daniel Pittman) Date: Sat, 12 Sep 2009 13:22:21 +1000 Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string In-Reply-To: (Timothy S. Nelson's message of "Sat, 12 Sep 2009 11:58:42 +1000 (EST)") References: <20090911090544.GA23111@pyro.home> <20090911123629.GA13362@nipl.net> Message-ID: <874or8alua.fsf@rimspace.net> "Timothy S. Nelson" writes: > On Fri, 11 Sep 2009, Sam Watkins wrote: >> On Fri, Sep 11, 2009 at 07:05:45PM +1000, Robert Norris wrote: >>> So, what's wrong here? And is there an easier way to do this? Note that >>> I'm restricted to Perl 5.6, which sucks as I'd really like to try the >>> PARNO stuff that came with 5.10. >> >> I think normal regexps aren't the right tool for this, you can do it >> easily in a couple of lines of C, but that method would be somewhat slow >> in perl. But given that you're dealing with IMAP, the network is going >> to be a lot slower, so you might as well just do it with a for loop over >> the characters and count parentheses, rather than some totally obscure >> regexp hack. > > Incidentally, this is something that Perl 6 will solve. Because it has > grammars. You could use Parse::RecDescent and an IMAP grammar, but that > would be overkill in a P5 situation. P6 on the other hand... :). I am curious why you say that using Parse::RecDescent is wrong with Perl5? I consider it likely to be more work than is strictly needed, and perhaps difficult to feed a protocol stream rather than a complete text, into, but I can't see why it would be any less right than in Perl6. Do you mind explaining further? You obviously see something I don't, and I would love to understand what. :) Regards, Daniel -- ? Daniel Pittman ? daniel at rimspace.net ? +61 401 155 707 ? made with 100 percent post-consumer electrons Looking for work? Love Perl? In Melbourne, Australia? We are hiring. From wayland at wayland.id.au Fri Sep 11 22:05:59 2009 From: wayland at wayland.id.au (Timothy S. Nelson) Date: Sat, 12 Sep 2009 15:05:59 +1000 (EST) Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string In-Reply-To: <874or8alua.fsf@rimspace.net> References: <20090911090544.GA23111@pyro.home> <20090911123629.GA13362@nipl.net> <874or8alua.fsf@rimspace.net> Message-ID: On Sat, 12 Sep 2009, Daniel Pittman wrote: > "Timothy S. Nelson" writes: >> On Fri, 11 Sep 2009, Sam Watkins wrote: >>> On Fri, Sep 11, 2009 at 07:05:45PM +1000, Robert Norris wrote: >>>> So, what's wrong here? And is there an easier way to do this? Note that >>>> I'm restricted to Perl 5.6, which sucks as I'd really like to try the >>>> PARNO stuff that came with 5.10. >>> >>> I think normal regexps aren't the right tool for this, you can do it >>> easily in a couple of lines of C, but that method would be somewhat slow >>> in perl. But given that you're dealing with IMAP, the network is going >>> to be a lot slower, so you might as well just do it with a for loop over >>> the characters and count parentheses, rather than some totally obscure >>> regexp hack. >> >> Incidentally, this is something that Perl 6 will solve. Because it has >> grammars. You could use Parse::RecDescent and an IMAP grammar, but that >> would be overkill in a P5 situation. P6 on the other hand... :). > > I am curious why you say that using Parse::RecDescent is wrong with Perl5? > > I consider it likely to be more work than is strictly needed, and perhaps > difficult to feed a protocol stream rather than a complete text, into, but > I can't see why it would be any less right than in Perl6. > > Do you mind explaining further? You obviously see something I don't, and > I would love to understand what. :) No, I think we're seeing the same thing here. I agree about feeding in the stream -- I had a patch for Parse::RecDescent that made that easy which I sent Damian, but I don't know that he ever applied it. I'm assuming that this is something where he has only a small amount of text (which may be an invalid assumption), and a pretty good idea of what it contains, and yes, Text::Balanced is probably exactly right for this. I basically thought that for something this size, Parse::RecDescent might be more hassle than it's worth. OTOH, it might make it easier to port to Perl 6 in another 2 years. :) --------------------------------------------------------------------- | Name: Tim Nelson | Because the Creator is, | | E-mail: wayland at wayland.id.au | I am | --------------------------------------------------------------------- ----BEGIN GEEK CODE BLOCK---- Version 3.12 GCS d+++ s+: a- C++$ U+++$ P+++$ L+++ E- W+ N+ w--- V- PE(+) Y+>++ PGP->+++ R(+) !tv b++ DI++++ D G+ e++>++++ h! y- -----END GEEK CODE BLOCK----- From daniel at rimspace.net Sat Sep 12 02:53:11 2009 From: daniel at rimspace.net (Daniel Pittman) Date: Sat, 12 Sep 2009 19:53:11 +1000 Subject: [Melbourne-pm] Extracting a parenthesized fragment from a string In-Reply-To: (Timothy S. Nelson's message of "Sat, 12 Sep 2009 15:05:59 +1000 (EST)") References: <20090911090544.GA23111@pyro.home> <20090911123629.GA13362@nipl.net> <874or8alua.fsf@rimspace.net> Message-ID: <87iqfo8p6g.fsf@rimspace.net> "Timothy S. Nelson" writes: > On Sat, 12 Sep 2009, Daniel Pittman wrote: >> "Timothy S. Nelson" writes: >>> On Fri, 11 Sep 2009, Sam Watkins wrote: >>>> On Fri, Sep 11, 2009 at 07:05:45PM +1000, Robert Norris wrote: [...] >> I am curious why you say that using Parse::RecDescent is wrong with Perl5? >> >> I consider it likely to be more work than is strictly needed, and perhaps >> difficult to feed a protocol stream rather than a complete text, into, but >> I can't see why it would be any less right than in Perl6. >> >> Do you mind explaining further? You obviously see something I don't, and >> I would love to understand what. :) > > No, I think we're seeing the same thing here. I agree about feeding in the > stream -- I had a patch for Parse::RecDescent that made that easy which I > sent Damian, but I don't know that he ever applied it. *nod* Thanks for explaining. I think you are right, and they are the same issues that we saw, differently expressed. :) > I'm assuming that this is something where he has only a small amount of text > (which may be an invalid assumption), and a pretty good idea of what it > contains, and yes, Text::Balanced is probably exactly right for this. I > basically thought that for something this size, Parse::RecDescent might be > more hassle than it's worth. Yeah. If I was going to bother with a parser I would target the entire IMAP protocol structure, either as a stream, or as a per-command-and-unsolicited -responses parser. Which would be a big job and appropriate and all. Daniel Sadly, I /have/ considered this, after I looked at the ... way that the existing IMAP modules were laid out, and prototyped QRESYNC support for three of them. *shudder* -- ? Daniel Pittman ? daniel at rimspace.net ? +61 401 155 707 ? made with 100 percent post-consumer electrons Looking for work? Love Perl? In Melbourne, Australia? We are hiring. From pml540114 at gmail.com Sun Sep 13 04:07:06 2009 From: pml540114 at gmail.com (P.M.Lawrence) Date: Sun, 13 Sep 2009 21:07:06 +1000 Subject: [Melbourne-pm] In case people haven't spotted this yet Message-ID: <4AACD25A.6040006@gmail.com> http://xkcd.com/519 From jarich at perltraining.com.au Sun Sep 20 19:30:09 2009 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Mon, 21 Sep 2009 12:30:09 +1000 Subject: [Melbourne-pm] LCA2010 Open Programming Languages Miniconf CFP closes this Friday, 25th September! In-Reply-To: <4AB1870A.9060307@perltraining.com.au> References: <70d969600909161340p1bf9c14dv6e3b4943c0695f24@mail.gmail.com> <4AB1870A.9060307@perltraining.com.au> Message-ID: <4AB6E531.5040500@perltraining.com.au> There's just this week to get your presentation proposals in for the LCA2010 Open Programming Languages Miniconf! Our call for presentations closes on Friday 25 September 2009, so if you're planning on attending LCA2010 in Wellington in January, and have something to say about doing development with Open Source programming languages, libraries or frameworks, we'd love to hear from you! We're looking primarily for standard-length talks (20-25 minutes including questions), but we'll also consider double-length talks on suitably compelling topics (that's 40-45 minutes including questions). Our CFP is available from http://blogs.tucs.org.au/oplm/cfp/ -- if you've already read it, you can submit your proposal at http://blogs.tucs.org.au/oplm/cfp/submit/ == ABOUT THE MINICONF == The Linux.conf.au Open Programming Languages Miniconf is a single-day mini-conference about application development with Open Source programming languages. Featuring talks on a wide range of topics and programming languages, this miniconf aims to bring together open source developers with presentations that share techniques, best practices and values amongst programmers of all open programming languages. OPLM2010 will be held at Linux.conf.au 2010, in Wellington, New Zealand on January 18. OPLM2010 is being organised by Christopher Neugebauer and Jacinta Richardson with help from the broader community. You can contact the OPLM2010 organising team at oplm2010 at googlegroups.com or visit the website at http://blogs.tucs.org.au/oplm From gberner at intraspect.com.au Thu Sep 24 04:02:12 2009 From: gberner at intraspect.com.au (Gerd Berner) Date: Thu, 24 Sep 2009 21:02:12 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML Message-ID: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> Hello All I have a simple one page HTML application that I want to distribute to a number of workstations (that will not have a HTTP server installed). The page has a graph which I want to be able to refresh using a perl script, but I havent been able to find a way to execute the perl script via a button on the page, without any help from CGI. Any help appreciated. Cheers Gerd From scottp at dd.com.au Thu Sep 24 04:41:49 2009 From: scottp at dd.com.au (Scott Penrose) Date: Thu, 24 Sep 2009 21:41:49 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> Message-ID: <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> Hi Gerd You have to have some form of code on the server to enable you to run Perl. E.g. you can embed perl, similar to PHP into an HTML page if you enable something like Mason, Template, or other server side code. You could also consider executing script with SSI (Service Side Include) if that can be enabled via Apache. Or of course you can just enable a CGI, and embed it using one of many methods, one of which could even be an iframe. Otherwise I can see no way in HTML to embed something. Now, because you mentioned Workstations, there may be an alternative, e.g. XUL - I don't think you can do it directly with HTML on a browser, but maybe with XUL in Firefox. Another way, depending on the technology, like where you get the data, could be by another language, such as XSL or Javascript, both of which can work directly in browsers. Can yo provide us with some more information. Scott On 24/09/2009, at 9:02 PM, Gerd Berner wrote: > Hello All > > I have a simple one page HTML application that I want to distribute > to a number of workstations (that will not have a HTTP server > installed). The page has a graph which I want to be able to refresh > using a perl script, but I havent been able to find a way to execute > the perl script via a button on the page, without any help from CGI. > > Any help appreciated. > > > Cheers > > Gerd > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm From gberner at intraspect.com.au Thu Sep 24 05:19:11 2009 From: gberner at intraspect.com.au (Gerd Berner) Date: Thu, 24 Sep 2009 22:19:11 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> Message-ID: <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> Hello all A number of responses already - Thanks! I should perhaps provide a few more details. I need to provide a very simple graphing application. A number of clients will be receiving a CSV file on a weekly basis and need to be able to graph and trend a number of the fields against a date field which is also included in the file. Requirements: - Cannot assume that the receivers will have MS office (or else they could possibly use Excel or Access) - There will be no Webserver available - Needs to work on Windows, Linux, Mac - cannot assume any particular web browser Anthony Fisher suggested - 'There's no general way to do this (AFAIK), but if you're targetting only IE on Windows you could use ActiveX.' - I don't want to restrict to IE. Michael Potter suggested -' Have a Perl script constantly running in the background and updating the graph as a PNG on disk or whatever. The use Javascript to reload the page (I am assuming here that Javascript can be used to reload a page from disk)'. - I thought this might be a solution, but I need to pass parameters to the perl script. Scott Penrose suggested - 'You have to have some form of code on the server to enable you to run Perl. E.g. you can embed perl, similar to PHP into an HTML page if you enable something like Mason, Template, or other server side code. You could also consider executing script with SSI (Service Side Include) if that can be enabled via Apache. Or of course you can just enable a CGI, and embed it using one of many methods, one of which could even be an iframe. Otherwise I can see no way in HTML to embed something. Now, because you mentioned Workstations, there may be an alternative, e.g. XUL - I don't think you can do it directly with HTML on a browser, but maybe with XUL in Firefox. Another way, depending on the technology, like where you get the data, could be by another language, such as XSL or Javascript, both of which can work directly in browsers.' I was hoping for a way to provide a HTML interface and a Perl script, packaged up to fulfill all the requirements, but it looks like it wont be that simple. I think it might be a job for Tk, which I was trying to avoid. Thanks very much for your help. Cheers Gerd -------------- next part -------------- An HTML attachment was scrubbed... URL: From tjc at wintrmute.net Thu Sep 24 05:20:37 2009 From: tjc at wintrmute.net (Toby Wintermute) Date: Thu, 24 Sep 2009 22:20:37 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> Message-ID: 2009/9/24 Gerd Berner : > Hello All > > I have a simple one page HTML application that I want to distribute to a > number of workstations (that will not have a HTTP server installed). ?The > page has a graph which I want to be able to refresh using a perl script, but > I havent been able to find a way to execute the perl script via a button on > the page, without any help from CGI. HTML is, for fairly good reason, not able to execute code on the machine it's browsed from, or anywhere for that matter, except in the Javascript/Flash/etc sandboxes. (Which are also forbidden from executing code on your machine) So you will need to do something like CGI.. However, you don't need a web server to be installed for that. Your Perl script can quite happily open up port 80 (or another, non-reserved port) and listen for HTTP requests upon it. (In effect, your Perl script becomes a stand-alone web server.) Cheers, Toby From scottp at dd.com.au Thu Sep 24 05:24:19 2009 From: scottp at dd.com.au (Scott Penrose) Date: Thu, 24 Sep 2009 22:24:19 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> Message-ID: <5873115E-39A3-46A6-8EB9-85B1DC764066@dd.com.au> On 24/09/2009, at 10:20 PM, Toby Wintermute wrote: > > Your Perl script can quite happily open up port 80 (or another, > non-reserved port) and listen for HTTP requests upon it. > (In effect, your Perl script becomes a stand-alone web server.) Yes, as Toby has said here, you can do it by running Perl. And with Strawberry perl and PAR you should be able to do it with one or two clicks for the operator. E.g. it might be run the program then go to the URL. Try HTTP::Daemon - I think it is fairly common SYNOPSIS use HTTP::Daemon; use HTTP::Status; my $d = HTTP::Daemon->new || die; print "Please contact me at: url, ">\n"; while (my $c = $d->accept) { while (my $r = $c->get_request) { if ($r->method eq 'GET' and $r->url->path eq "/ xyzzy") { # remember, this is *not* recommended practice :-) $c->send_file_response("/etc/passwd"); } else { $c->send_error(RC_FORBIDDEN) } } $c->close; undef($c); } Scott From gberner at intraspect.com.au Thu Sep 24 05:41:46 2009 From: gberner at intraspect.com.au (Gerd Berner) Date: Thu, 24 Sep 2009 22:41:46 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <5873115E-39A3-46A6-8EB9-85B1DC764066@dd.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <5873115E-39A3-46A6-8EB9-85B1DC764066@dd.com.au> Message-ID: hmmm.... That could be a good option, I could open a port ,make a call to system to start the browser, and pass it the URL. The perl 'listener' can then handle any redrawing of the graph that is required. On 24/09/2009, at 10:24 PM, Scott Penrose wrote: > > On 24/09/2009, at 10:20 PM, Toby Wintermute wrote: > >> >> Your Perl script can quite happily open up port 80 (or another, >> non-reserved port) and listen for HTTP requests upon it. >> (In effect, your Perl script becomes a stand-alone web server.) > > Yes, as Toby has said here, you can do it by running Perl. And with > Strawberry perl and PAR you should be able to do it with one or two > clicks for the operator. E.g. it might be run the program then go to > the URL. > > Try HTTP::Daemon - I think it is fairly common > > SYNOPSIS > use HTTP::Daemon; > use HTTP::Status; > > my $d = HTTP::Daemon->new || die; > print "Please contact me at: url, ">\n"; > while (my $c = $d->accept) { > while (my $r = $c->get_request) { > if ($r->method eq 'GET' and $r->url->path eq "/ > xyzzy") { > # remember, this is *not* recommended practice :-) > $c->send_file_response("/etc/passwd"); > } > else { > $c->send_error(RC_FORBIDDEN) > } > } > $c->close; > undef($c); > } > > > Scott > From tjc at wintrmute.net Thu Sep 24 05:24:47 2009 From: tjc at wintrmute.net (Toby Wintermute) Date: Thu, 24 Sep 2009 22:24:47 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> Message-ID: 2009/9/24 Gerd Berner : > Hello all > A number of responses already - Thanks! > I should perhaps provide a few more details. ?I need to provide a very > simple graphing application. ?A number of clients will be receiving a CSV > file on a weekly basis and need to be able to graph and trend a number of > the fields against a date field which is also included in the file. > Requirements: > - Cannot assume that the receivers will have MS office (or else they could > possibly use Excel or Access) > - There will be no Webserver available > - Needs to work on Windows, Linux, Mac > - cannot assume any particular web browser Hmm... Given those requirements, I think Java is the way to go.. You can embed it within an HTML document, and it'll be executable and able to do things like accept a CSV file and produce graphs. Java applets will run on Windows, Linux and Mac. Major downside? You'll have to program it in Java ;) -Toby From sam at nipl.net Thu Sep 24 14:25:21 2009 From: sam at nipl.net (Sam Watkins) Date: Fri, 25 Sep 2009 07:25:21 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> Message-ID: <20090924212521.GA2522@nipl.net> On Thu, Sep 24, 2009 at 10:19:11PM +1000, Gerd Berner wrote: > Requirements: > - Cannot assume that the receivers will have MS office (or else they could > possibly use Excel or Access) > - There will be no Webserver available > - Needs to work on Windows, Linux, Mac > - cannot assume any particular web browser Perl is a lot heavier than a simple web server, can you ensure they will have perl installed? I would suggest to do this in javascript, there are plenty of javascript graphing libraries out there already. Sam From gberner at intraspect.com.au Thu Sep 24 15:03:36 2009 From: gberner at intraspect.com.au (Gerd Berner) Date: Fri, 25 Sep 2009 08:03:36 +1000 Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <20090924212521.GA2522@nipl.net> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> <20090924212521.GA2522@nipl.net> Message-ID: Hi Sam I'm looking to package it up using the development kit from ActiveState. My understanding is that by doing this you can create a native installer without having Perl pre-installed on the target system. Does anyone have any comments or advice on that? I agree that Javascript would be a better solution, but I know a lot more Perl than I do Javascript and I need to get this moving quickly. Thanks for your advice! Cheers Gerd On 25/09/2009, at 7:25 AM, Sam Watkins wrote: > On Thu, Sep 24, 2009 at 10:19:11PM +1000, Gerd Berner wrote: >> Requirements: >> - Cannot assume that the receivers will have MS office (or else >> they could >> possibly use Excel or Access) >> - There will be no Webserver available >> - Needs to work on Windows, Linux, Mac >> - cannot assume any particular web browser > > Perl is a lot heavier than a simple web server, can you ensure they > will > have perl installed? > > I would suggest to do this in javascript, there are plenty of > javascript > graphing libraries out there already. > > Sam From adrian at ash-blue.org Thu Sep 24 15:53:58 2009 From: adrian at ash-blue.org (Adrian Masters) Date: Fri, 25 Sep 2009 08:53:58 +1000 (EST) Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> Message-ID: <1206.58.6.71.175.1253832838.squirrel@webmail.bella.lunarpages.com> Gerd, If the number of variables is small, and there is no filtering of values to get the graphs, you could generate the graphs as PDFs or PNGs and send them with the CSV file. You could also send an updated menu/list HTML file. All static, all blindingly fast and browser/OS agnostic. You only need Perl + some graphics modules on the server & don't need to install any applications. If there's filtering, or a large number of variables/variatons, then.... Adrian > Hello all > > A number of responses already - Thanks! > > I should perhaps provide a few more details. I need to provide a very > simple graphing application. A number of clients will be receiving a > CSV file on a weekly basis and need to be able to graph and trend a > number of the fields against a date field which is also included in > the file. > > Requirements: > > - Cannot assume that the receivers will have MS office (or else they > could possibly use Excel or Access) > - There will be no Webserver available > - Needs to work on Windows, Linux, Mac > - cannot assume any particular web browser > [snip] > Cheers > > Gerd_______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm From scottp at dd.com.au Thu Sep 24 17:16:57 2009 From: scottp at dd.com.au (scottp at dd.com.au) Date: Thu, 24 Sep 2009 19:16:57 -0500 (CDT) Subject: [Melbourne-pm] Run Perl Script from HTML In-Reply-To: References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> <20090924212521.GA2522@nipl.net> Message-ID: <2C63626D-2EDE-4E6F-8A04-C8FC008FB424@dd.com.au> Instead of active state, consider strawberry Perl & par Scott Penrose http://scott.dd.com.au/ On 25/09/2009, at 8:10, Gerd Berner wrote: > Hi Sam > > I'm looking to package it up using the development kit from > ActiveState. My understanding is that by doing this you can create > a native installer without having Perl pre-installed on the target > system. Does anyone have any comments or advice on that? > > I agree that Javascript would be a better solution, but I know a lot > more Perl than I do Javascript and I need to get this moving quickly. > > Thanks for your advice! > > > Cheers > > Gerd > > > On 25/09/2009, at 7:25 AM, Sam Watkins wrote: > >> On Thu, Sep 24, 2009 at 10:19:11PM +1000, Gerd Berner wrote: >>> Requirements: >>> - Cannot assume that the receivers will have MS office (or else >>> they could >>> possibly use Excel or Access) >>> - There will be no Webserver available >>> - Needs to work on Windows, Linux, Mac >>> - cannot assume any particular web browser >> >> Perl is a lot heavier than a simple web server, can you ensure they >> will >> have perl installed? >> >> I would suggest to do this in javascript, there are plenty of >> javascript >> graphing libraries out there already. >> >> Sam > > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm From daniel at rimspace.net Thu Sep 24 18:23:57 2009 From: daniel at rimspace.net (Daniel Pittman) Date: Fri, 25 Sep 2009 11:23:57 +1000 Subject: [Melbourne-pm] Strawberry Perl and PAR (was Re: Run Perl Script from HTML) In-Reply-To: <2C63626D-2EDE-4E6F-8A04-C8FC008FB424@dd.com.au> (scottp@dd.com.au's message of "Thu, 24 Sep 2009 19:16:57 -0500 (CDT)") References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> <20090924212521.GA2522@nipl.net> <2C63626D-2EDE-4E6F-8A04-C8FC008FB424@dd.com.au> Message-ID: <87y6o3lsuq.fsf_-_@rimspace.net> scottp at dd.com.au writes: > Instead of active state, consider strawberry Perl & par Ah, a recommendation for those tools! Excellent! That presumably means that you have worked with them. Other than the standard PAR problems, like five-year-old bugs causing it to do the wrong thing when it comes to detecting changed libraries, how well does this work? Specifically, how well does that combination work for applications on Windows with random CPAN stuff, potentially including XS code? Does it just work(tm), or are there rough edges? Do you usually use the "spit out an exe" model, or just bundle a Perl scripts or PAR suitable for use with parl on the machine? We presently have a need to solve the problem of distributing worker software to a number of machines, and I really don't want to go down the path of forcing every job to update installed software; that makes for a lot of overhead. PAR *sounds* nice, and it beats having to write our own equivalent, but I am still a bit nervous about how well it will fly in practice on Windows... Daniel -- ? Daniel Pittman ? daniel at rimspace.net ? +61 401 155 707 ? made with 100 percent post-consumer electrons Looking for work? Love Perl? In Melbourne, Australia? We are hiring. From toby.corkindale at strategicdata.com.au Thu Sep 24 19:31:57 2009 From: toby.corkindale at strategicdata.com.au (Toby Corkindale) Date: Fri, 25 Sep 2009 12:31:57 +1000 Subject: [Melbourne-pm] Strawberry Perl and PAR (was Re: Run Perl Script from HTML) In-Reply-To: <87y6o3lsuq.fsf_-_@rimspace.net> References: <842CB212-B2BA-4B9E-AA0E-F0785A385B16@intraspect.com.au> <66F95845-BE13-48D2-A859-1577794C2B45@dd.com.au> <35088CE2-8C36-4F41-917B-FEFBD128CEFD@intraspect.com.au> <20090924212521.GA2522@nipl.net> <2C63626D-2EDE-4E6F-8A04-C8FC008FB424@dd.com.au> <87y6o3lsuq.fsf_-_@rimspace.net> Message-ID: <4ABC2B9D.6070404@strategicdata.com.au> Daniel Pittman wrote: > scottp at dd.com.au writes: > >> Instead of active state, consider strawberry Perl & par > > Ah, a recommendation for those tools! Excellent! > > That presumably means that you have worked with them. Other than the standard > PAR problems, like five-year-old bugs causing it to do the wrong thing when it > comes to detecting changed libraries, how well does this work? For those of you curious about this particular PAR bug.. PAR caches the contents of the archives, and is meant to detect if the cache is up-to-date by a checksum. Unfortunately a very-long-standing issue with PAR is that it checksums $0 (well, argv[0] actually), rather than the actual .par file. Now, if you're distributing a self-contained .exe with your application, then this is acceptable behaviour.. since your .exe will change every time you build a new version, and thus the checksum will change, and the new version of your app will run. However if you run your app via "parl myapp.par" instead, perhaps because you have a selection of Perl scripts you'd like to run in it, then you'll only ever get the first version you distribute.. (Because it's checksumming parl, not myapp.par. Whoops.) The pure-perl implementation of PAR does the right thing, and thus both the following methods also work correctly: #!/usr/bin/perl use PAR 'myapp.par'; or perl -MPAR myapp.par -Toby From andrew.stuart at flatraterecruitment.com.au Fri Sep 25 00:06:46 2009 From: andrew.stuart at flatraterecruitment.com.au (Andrew Stuart) Date: Fri, 25 Sep 2009 17:06:46 +1000 Subject: [Melbourne-pm] Market research - Gopher In-Reply-To: <4AACD25A.6040006@gmail.com> References: <4AACD25A.6040006@gmail.com> Message-ID: <713F8607-8D4C-498D-97A0-2BF5016D206F@flatraterecruitment.com.au> We're doing some market research on attitudes to Gopher. Does anyone here remember Gopher? If yes, what do you think when you remember it? Do you recall it with fondness or derision? Do you have any comments or recollections of Gopher? Thanks Andrew Stuart From jarich at perltraining.com.au Sun Sep 27 20:22:01 2009 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Mon, 28 Sep 2009 13:22:01 +1000 Subject: [Melbourne-pm] LCA2010 diversity programme: applications close THIS FRIDAY Message-ID: <4AC02BD9.7010402@perltraining.com.au> WELLINGTON, New Zealand ? Friday 11 September 2009 ? linux.conf.au 2010 Organisers are proud to announce three funding programmes! The three funding programmes - InternetNZ Oceania Programme, InternetNZ Kiwi Fellowship and Google Diversity Programme - have been created to assist those delegates contributing to the Open Source community who, without financial assistance, would not be able to attend LCA2010. InternetNZ Oceania Programme - Many highly-skilled Open Source contributors are living throughout the greater Australasia and Pacific regions who, without financial assistance, would not be able to attend linux.conf.au. LCA2010 and InternetNZ are proud to offer this out-reach programme in support of those communities. http://www.lca2010.org.nz/register/funding#InternetNZOceaniaProgramme InternetNZ Kiwi Fellowship - LCA2010 will be the first time the conference has been held in New Zealand's capital city, Wellington. LCA2010 and InternetNZ are proud to support New Zealanders contributing to the Open Source community by offering this funding programme. http://www.lca2010.org.nz/register/funding#InternetNZKiwiFellowship Google Diversity Programme - LCA2010 and Google are proud to support diverse groups, such as people with disabilities, and women. The Google Diversity Programme is designed to ensure LCA2010 continues to be an open and welcoming conference for everyone. http://www.lca2010.org.nz/register/funding#GoogleDiversityProgramme "We are thrilled to be able to offer three great grant programmes", said Brenda Wallace, LCA2010 Funding Manager. "We've been overwhelmed with positive support from our Emperor Penguin Sponsors, InternetNZ and Google, in providing opportunities for more people to be able to attend the conference. I'm personally looking forward to notifying the winners!". For more information, please see: http://www.lca2010.org.nz/register/funding About linux.conf.au linux.conf.au is one of the world's best conferences for free and open source software! The coming linux.conf.au, LCA2010, will be held at the Wellington Convention Centre in Wellington, New Zealand from Monday 18th January to Saturday 23rd January 2010. LCA2010 is fun, informal and seriously technical, bringing together Free and Open Source developers, users and community champions from around the world. LCA2010 is the second time linux.conf.au has been held in New Zealand, with the first being Dunedin in 2006. For more information see: http://www.lca2010.org.nz/ About Linux Australia Linux Australia is the peak body for Linux User Groups (LUGs) around Australia, and as such represents approximately 5000 Australian Linux users and developers. Linux Australia facilitates the organisation of this international Free Software conference in a different Australasian city each year. For more information see: http://www.linux.org.au/ Emperor Penguin Sponsors LCA2010 is proud to acknowledge the support of our Emperor Penguin Sponsors, InternetNZ and Google. For more information about InternetNZ, see: http://www.internetnz.org.nz/ For more information about Google, see: http://www.google.com/ From sgc294 at internode.on.net Tue Sep 29 17:51:06 2009 From: sgc294 at internode.on.net (andrew Dent) Date: Wed, 30 Sep 2009 10:51:06 +1000 Subject: [Melbourne-pm] Can Dependant modules be configured by Perl Version Message-ID: <4AC2AB7A.9020608@internode.on.net> G'day The IO::Interaction documentation on CPAN doesn't mention version.pm as a dependency. Installing on 5.10 (ubuntu 9.04) isn't a problem because version.pm is included in the core of 5.10. But when installing IO::Interactive on 5.8.6 (HPUX 10.20) the install fails with # Error: Can't locate version.pm in @INC Is this a bug in IO::Interactive (that version.pm isn't considered a dependancy) or a "feature" in Perl that a module's declared dependancies cannot be Perl version specific? Cheers Andrew From pjf at perltraining.com.au Tue Sep 29 19:46:39 2009 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed, 30 Sep 2009 12:46:39 +1000 Subject: [Melbourne-pm] Can Dependant modules be configured by Perl Version In-Reply-To: <4AC2AB7A.9020608@internode.on.net> References: <4AC2AB7A.9020608@internode.on.net> Message-ID: <4AC2C68F.9000800@perltraining.com.au> G'day Andrew, Andrew Dent wrote: > But when installing IO::Interactive on 5.8.6 (HPUX 10.20) the install > fails with > # Error: Can't locate version.pm in @INC > > Is this a bug in IO::Interactive (that version.pm isn't considered a > dependancy) or a "feature" in Perl that a module's declared dependancies > cannot be Perl version specific? Sounds like a bug to me. The module isn't correctly specifying all its dependencies. For what it's worth, it's quite possible to have platform and version based dependencies, although expressing that in the meta-info (eg, META.yml) isn't. As an example, IPC::System::Simple has extra dependencies when running under Windows. Cheerio, Paul -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 From daniel at rimspace.net Tue Sep 29 20:04:07 2009 From: daniel at rimspace.net (Daniel Pittman) Date: Wed, 30 Sep 2009 13:04:07 +1000 Subject: [Melbourne-pm] Can Dependant modules be configured by Perl Version In-Reply-To: <4AC2C68F.9000800@perltraining.com.au> (Paul Fenwick's message of "Wed, 30 Sep 2009 12:46:39 +1000") References: <4AC2AB7A.9020608@internode.on.net> <4AC2C68F.9000800@perltraining.com.au> Message-ID: <87bpktb0bc.fsf@rimspace.net> Paul Fenwick writes: > Andrew Dent wrote: > >> But when installing IO::Interactive on 5.8.6 (HPUX 10.20) the install >> fails with >> # Error: Can't locate version.pm in @INC >> >> Is this a bug in IO::Interactive (that version.pm isn't considered a >> dependancy) or a "feature" in Perl that a module's declared dependancies >> cannot be Perl version specific? > > Sounds like a bug to me. The module isn't correctly specifying all its > dependencies. ...because the version.pm dependency would be satisfied on 5.10 through the core module, right? > For what it's worth, it's quite possible to have platform and version based > dependencies, although expressing that in the meta-info (eg, META.yml) > isn't. I understood that the META.yml file included a flag that indicated "static" dependency information, and unless that was set you were obliged to execute the Makefile.PL to ensure they were up to date... > As an example, IPC::System::Simple has extra dependencies when running under > Windows. ...which allowed things like this to be expressed sensibly. Daniel -- ? Daniel Pittman ? daniel at rimspace.net ? +61 401 155 707 ? made with 100 percent post-consumer electrons Looking for work? Love Perl? In Melbourne, Australia? We are hiring.