From pjf at perltraining.com.au Sun Jan 5 00:32:23 2003 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Rings Message-ID: <20030105063223.GD30291@mukc.org.au> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 G'day everyone, As per tradition[1], the first meeting of Melbourne Perl Mongers for 2003 will be a movie viewing. Everyone is welcome to attend. The details are: Movie: Lord of the Rings - The Two Towers Date: Wednesday, 8th January 2003 Time: 7pm Location: Village Cinemas at Crown Southbank Cost: $14 adult, $11.50 student/pension, $9.50 senior Hint: If purchasing four or more adult tickets, it's actually cheaper to purchase a book of five "screen savers" tickets ($55/book from memory). I believe tickets can be purchased on-line from the links at http://www.villagecinemas.com.au/ . All the very best, Paul [1] We did it for the first meeting of 2001, so it's kind of traditional. - -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.6 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE+F9F2x5N6j7FHnlURAof6AJ0cM5wYbn6TrXlI38FKh5IzxUf64wCghF49 qNisl+BYBgoRE9kSoG9+zDs= =8mbF -----END PGP SIGNATURE----- From gustaf at cmetech.com.au Sun Jan 5 05:14:09 2003 From: gustaf at cmetech.com.au (Gustaf Bjorksten) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Rings In-Reply-To: <20030105063223.GD30291@mukc.org.au> Message-ID: On Sun, 5 Jan 2003, Paul Fenwick wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > G'day everyone, > > As per tradition[1], the first meeting of Melbourne Perl Mongers > for 2003 will be a movie viewing. Everyone is welcome to attend. > The details are: > > Movie: Lord of the Rings - The Two Towers Hmmm... i reckon you may find everyone has already seen it. The four days after christmas was the biggest turnout at the cinemas in australian history > Date: Wednesday, 8th January 2003 I thought this was the night that we were going to have a sesh at nerdlabs to work on scott's Hostname::Long thing on different architectures? Maybe we have left this too late? Scott? L8rz, FooBard - Jester from the Court of Chaos > Time: 7pm > Location: Village Cinemas at Crown > Southbank > Cost: $14 adult, $11.50 student/pension, $9.50 senior > Hint: If purchasing four or more adult tickets, > it's actually cheaper to purchase a book of > five "screen savers" tickets ($55/book from > memory). > > I believe tickets can be purchased on-line from the links at > http://www.villagecinemas.com.au/ . > > All the very best, > > Paul > > [1] We did it for the first meeting of 2001, so it's kind of > traditional. > > - -- > Paul Fenwick | http://perltraining.com.au/ > Director of Training | Ph: +61 3 9354 6001 > Perl Training Australia | Fax: +61 3 9354 2681 > -----BEGIN PGP SIGNATURE----- > Version: GnuPG v1.0.6 (GNU/Linux) > Comment: For info see http://www.gnupg.org > > iD8DBQE+F9F2x5N6j7FHnlURAof6AJ0cM5wYbn6TrXlI38FKh5IzxUf64wCghF49 > qNisl+BYBgoRE9kSoG9+zDs= > =8mbF > -----END PGP SIGNATURE----- > Net Cens0rship = Book Burning in the Digital Age http://www.efa.org.au/ From Daniel at landmarksoftware.com.au Sun Jan 5 07:21:48 2003 From: Daniel at landmarksoftware.com.au (Daniel Walmsley) Date: Wed Aug 4 00:02:48 2004 Subject: Perl polls well in Jobs by Language Message-ID: http://www.bitbreather.com/programming_languages.html The pie chart on the page given above shows Perl putting in a strong showing versus Java, C++ and VB (shudder). Hurrah! Dan From crashkat at cmetech.com.au Sun Jan 5 16:30:36 2003 From: crashkat at cmetech.com.au (crashkat) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Rings In-Reply-To: Message-ID: On Sun, 5 Jan 2003, Gustaf Bjorksten wrote: > I thought this was the night that we were going to have a sesh at > nerdlabs to work on scott's Hostname::Long thing on different > architectures? Maybe we have left this too late? Scott? > Yeah, that's what I thought :( We cleaned up and everything... From david_dick at iprimus.com.au Sun Jan 5 17:18:07 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Rings In-Reply-To: References: Message-ID: <3E18BD2F.5080209@iprimus.com.au> with perltidy of course? crashkat wrote: >On Sun, 5 Jan 2003, Gustaf Bjorksten wrote: > > > >>I thought this was the night that we were going to have a sesh at >>nerdlabs to work on scott's Hostname::Long thing on different >>architectures? Maybe we have left this too late? Scott? >> >> >> > >Yeah, that's what I thought :( We cleaned up and everything... > > > > From jarich at perltraining.com.au Sun Jan 5 17:39:54 2003 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Rings In-Reply-To: Message-ID: > > I thought this was the night that we were going to have a sesh at > > nerdlabs to work on scott's Hostname::Long thing on different > > architectures? Maybe we have left this too late? Scott? > > > > Yeah, that's what I thought :( We cleaned up and everything... I thought we were planning to meet at the nerdlab and then go see the movie and then either separate or head back to the nerdlab thereafter. Jacinta -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +613 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact@perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | From scottp at dd.com.au Sun Jan 5 17:47:54 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Rings In-Reply-To: Message-ID: <1C08C966-2108-11D7-805F-003065B58CF8@dd.com.au> I thought we where heading to your (Foo and Crash) place first and then seeing a later session (eg: 8 or 9) ? Is this still possible ? Scott On Monday, Jan 6, 2003, at 09:30 Australia/Melbourne, crashkat wrote: > > > On Sun, 5 Jan 2003, Gustaf Bjorksten wrote: > >> I thought this was the night that we were going to have a sesh at >> nerdlabs to work on scott's Hostname::Long thing on different >> architectures? Maybe we have left this too late? Scott? >> > > Yeah, that's what I thought :( We cleaned up and everything... > > > > -- Scott Penrose Welcome to the Digital Dimension http://www.dd.com.au/ scottp@dd.com.au Dismaimer: Contents of this mail and signature are bound to change randomly. Whilst every attempt has been made to control said randomness, the author wishes to remain blameless for the number of eggs that damn chicken laid. Oh and I don't want to hear about butterflies either. From pjf at perltraining.com.au Sun Jan 5 18:01:11 2003 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: <1C08C966-2108-11D7-805F-003065B58CF8@dd.com.au> References: <1C08C966-2108-11D7-805F-003065B58CF8@dd.com.au> Message-ID: <20030106000111.GA8773@mukc.org.au> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 G'day Everyone, Obviously I need to take notes. A visit to Nerdlab was indeed mentioned last meeting. If people haven't already grabbed their tickets, how about a revised schedule? What: Perl Mongers @ Nerdlab When: Wed 8th January, about 6pm Where: Kat and Gus to provide directions in follow-up mail. FOLLOWED BY.... (for those who haven't seen it - just me?) What: Lord of the Rings Time: 8pm Location: Village Cinemas at Crown Southbank Cost: $14 adult, $11.50 student/pension, $9.50 senior Hint: If purchasing four or more adult tickets, it's actually cheaper to purchase a book of five "screen savers" tickets ($55/book from memory). Cheers, Paul - -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.6 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE+GMdHx5N6j7FHnlURAoL8AJ9sd7iMUnSdnNyOJSYycsk39YW1SwCeOtvN 6T1Sw3uKzQr0pTkNgay4jug= =/Z7O -----END PGP SIGNATURE----- From scottp at dd.com.au Sun Jan 5 18:31:15 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: <20030106000111.GA8773@mukc.org.au> Message-ID: <2A1BE9C6-210E-11D7-A80C-003065B58CF8@dd.com.au> > 6pm - Nerdlab > 8pm - Movie That should give us an hour and a half to play with computers then off to the movies. Sounds great. I will be there :-) Scott From Daniel at landmarksoftware.com.au Sun Jan 5 21:52:57 2003 From: Daniel at landmarksoftware.com.au (Daniel Walmsley) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab Message-ID: Seen it - as has most of humanity. May I humbly suggest the following? : Spirited Away: Nova, 7.40pm 10.05pm A neat-o cartoon from someone allegedly famous. Donny Darko: Nova, 9.35pm Awesome teen psychological flick set in the 80's. Worth it for the soundtrack alone. Bowling for Columbine: Kino, Melbourne 7.15pm 9.30pm; Nova, Carlton 7.20pm 9.40pm I've seen it, but would gladly watch it again. Laugh out loud, cry out loud edu-docu-comedy from one of America's fattest and hairiest entertainers. Die Another Day: Village at Crown Gold Class, Southbank 9.45pm Switch your brain off. Y Tu Mama Tambien: Lumiere, Melbourne 9.10pm Don't let the name fool you. It's not just arthouse, it's a film about two teen root-rats competing for the affections of a wise old female root-rat. But heck, it's in Spanish, which means we can merrily throw political correctness out the window. Anyhoo, these are the ones I would see. Out of these, I've already seen Donny Darko and Bowling for Columbine. And heck, there's nothing stopping us from deciding on the spur of the moment, eh? Cheers buckos, Dan -----Original Message----- From: Paul Fenwick [mailto:pjf@perltraining.com.au] Sent: Monday, 6 January 2003 11:01 AM To: Melbourne Perl Mongers Cc: crashkat; Gustaf Bjorksten; Scott Penrose Subject: Re: Melb.PM to see Lord of the Nerdlab -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 G'day Everyone, Obviously I need to take notes. A visit to Nerdlab was indeed mentioned last meeting. If people haven't already grabbed their tickets, how about a revised schedule? What: Perl Mongers @ Nerdlab When: Wed 8th January, about 6pm Where: Kat and Gus to provide directions in follow-up mail. FOLLOWED BY.... (for those who haven't seen it - just me?) What: Lord of the Rings Time: 8pm Location: Village Cinemas at Crown Southbank Cost: $14 adult, $11.50 student/pension, $9.50 senior Hint: If purchasing four or more adult tickets, it's actually cheaper to purchase a book of five "screen savers" tickets ($55/book from memory). Cheers, Paul - -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.6 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE+GMdHx5N6j7FHnlURAoL8AJ9sd7iMUnSdnNyOJSYycsk39YW1SwCeOtvN 6T1Sw3uKzQr0pTkNgay4jug= =/Z7O -----END PGP SIGNATURE----- From rickm at isite.net.au Sun Jan 5 22:05:42 2003 From: rickm at isite.net.au (Rick Measham) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: Yup, I've seen LOTR and its too long to see it again, especially so soon. I'd love to come to Nerdlab but won't follow onto LOTR. On the other hand if we're going to see something like Bowling for Columbine I'll bring my wife too :) Cheers all! Rick Measham (P.S. Any info on where Nerdlab is .. and what exactly goes on there?) > Bowling for Columbine: Kino, Melbourne 7.15pm 9.30pm; Nova, Carlton > 7.20pm 9.40pm > I've seen it, but would gladly watch it again. Laugh out loud, cry out > loud edu-docu-comedy from one of America's fattest and hairiest > entertainers. -------------------------------------------------------- ?? ? ? ? ? ? There are 10 kinds of people: ?? those that understand binary, and those that don't. -------------------------------------------------------- ?? The day Microsoft makes something that doesn't suck ?? ? is the day they start selling vacuum cleaners -------------------------------------------------------- From pjf at perltraining.com.au Sun Jan 5 22:25:43 2003 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: References: Message-ID: <20030106042543.GD8773@mukc.org.au> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 G'day Everyone, On Mon, Jan 06, 2003 at 02:52:57PM +1100, Daniel Walmsley wrote: > Spirited Away: Nova, 7.40pm 10.05pm > A neat-o cartoon from someone allegedly famous. Hayao Miyazaki is famous. He's the producer of My Neighbour Totoro, Laputa, Porco Rosso, Nausicaa, Princess Mononoke, and a number of other excellent films. Spirited Away is great, and gets a double-thumbs-up. > And heck, there's nothing stopping us from deciding on the spur of the > moment, eh? Quite a good idea. Although we may have mongers who want to head straight to the movie, in which case a time/location/movie announcement beforehand would probably be useful. Cheers, Paul - -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.6 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE+GQVHx5N6j7FHnlURAjGlAJwOuQo3wmRWPTFLy2pFu1ub+k9bngCeKJM5 JoDwRkfYHVE6/JOguA+z35g= =9sv8 -----END PGP SIGNATURE----- From gustaf at cmetech.com.au Mon Jan 6 00:17:20 2003 From: gustaf at cmetech.com.au (Gustaf Bjorksten) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: On Mon, 6 Jan 2003, Rick Measham wrote: > Yup, I've seen LOTR and its too long to see it again, especially so soon. > I'd love to come to Nerdlab but won't follow onto LOTR. On the other hand if > we're going to see something like Bowling for Columbine I'll bring my wife > too :) Nerdlab is close to the Lumiere which is cool if peeps want to see the spanish flick. It is also close to the bourke and russell st cinemas in the cbd if there is anything on there. It is only a short tram ride (10 min) and short walk to get to the nova in lygon st. crash and i have seen lotr, bowling for columbine, and the 007 flick also. We haven't seen spirited away yet and would really like to, so that gets my vote :) I think spirited away is on in the cbd as well as at the nova. > (P.S. Any info on where Nerdlab is .. and what exactly goes on there?) > Nerdlab is here... http://foobard.cmetech.com.au ...and, uh, "stuff" goes on there m'kay ;) L8r, Foobard - Jester from the Court of Chaos Net Cens0rship = Book Burning in the Digital Age http://www.efa.org.au/ From crashkat at cmetech.com.au Mon Jan 6 00:36:52 2003 From: crashkat at cmetech.com.au (crashkat) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: On Mon, 6 Jan 2003, Gustaf Bjorksten wrote: > crash and i have seen lotr, bowling for columbine, and the 007 flick > also. > ...yep, but I, like Dan, would like to see bowling for columbine again. > > (P.S. Any info on where Nerdlab is .. and what exactly goes on there?) We boil up little children and eat them for dinner. (so pls don't bring any children you're emotionally attached to). hehehe From scottp at dd.com.au Mon Jan 6 17:23:02 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: > > We haven't seen spirited away yet and would really like to, so that > gets > my vote :) I think spirited away is on in the cbd as well as at the > nova. > I have seen spirited away and is probably now my favorite movie - it ROCKS !. SO... I would love to see it again too :-) Scott -- Scott Penrose VP in charge of Pancakes http://linux.dd.com.au/ scottp@dd.com.au Dismaimer: If you receive this email in error - please eat it immediately to prevent it from falling into the wrong hands. From jens at cyber.com.au Tue Jan 7 17:29:05 2003 From: jens at cyber.com.au (Jens Porup) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: <20030106042543.GD8773@mukc.org.au> References: <20030106042543.GD8773@mukc.org.au> Message-ID: <20030107232905.GA26978@vanilla.office.cyber.com.au> > > And heck, there's nothing stopping us from deciding on the spur of the > > moment, eh? > > Quite a good idea. Although we may have mongers who want to head > straight to the movie, in which case a time/location/movie announcement > beforehand would probably be useful. Yes, could we decide soon? For instance, my wife has no professional interest in Perl, but would like to join us after for the movie.... Also, what about food? Should we plan on eating before Nerdlabs, or are we going to eat out/get takeaway? Cheers, Jens From gustaf at cmetech.com.au Tue Jan 7 18:42:35 2003 From: gustaf at cmetech.com.au (Gustaf Bjorksten) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: <20030107232905.GA26978@vanilla.office.cyber.com.au> Message-ID: On Wed, 8 Jan 2003, Jens Porup wrote: > > Quite a good idea. Although we may have mongers who want to head > > straight to the movie, in which case a time/location/movie announcement > > beforehand would probably be useful. > > Yes, could we decide soon? For instance, my wife has no professional > interest in Perl, but would like to join us after for the movie.... > > Also, what about food? Should we plan on eating before Nerdlabs, or > are we going to eat out/get takeaway? i would still like to have a go at scott's Hostname::Long thing, so my proposal is: 1800hrs turn up @ Nerdlab 1800-2000hrs work on Hostname::Long on various platforms* 2000-2130hrs eat @ some place in chinatown 2130-2200hrs head down to the nova in carlton 2200-????hrs see spirited away we could do Hostname::Long on the following platforms for sure: OS Hardware -- -------- IRIX SGI Indy Solaris Sun Ultra 5 HP-UX HP9000 D-Class and with a bit of effort (and people who know what they are doing?) we may also be able to do these: OpenVMS DEC VAX 3100 (needs OS install from cdrom) AIX IBM RS6000 F50 (move from myi to lab, get on network) FreeBSD intel box (needs OS install from cdrom) there are lots of other platforms @ Nerdlab, but we do not have enough time (or powerpoints) to get them going at this time. Scott, can you describe what exactly needs to be done to get Hostname::Long working of the different platforms? Can you give us some code examples to prime us? :) L8rz, Foobard - Jester from the Court of Chaos Net Cens0rship = Book Burning in the Digital Age http://www.efa.org.au/ From gustaf at cmetech.com.au Tue Jan 7 18:47:48 2003 From: gustaf at cmetech.com.au (Gustaf Bjorksten) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: <20030107232905.GA26978@vanilla.office.cyber.com.au> Message-ID: we could also do Hostname::Long on SCO Unix also, if danger brings media that is *heh* ;) L8rz, Foobard - Jester from the Court of Chaos Net Cens0rship = Book Burning in the Digital Age http://www.efa.org.au/ From scottp at dd.com.au Tue Jan 7 18:53:10 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: <8F043D9C-22A3-11D7-A9A4-003065B58CF8@dd.com.au> > > i would still like to have a go at scott's Hostname::Long thing, so my > proposal is: > > 1800hrs turn up @ Nerdlab > 1800-2000hrs work on Hostname::Long on various platforms* > 2000-2130hrs eat @ some place in chinatown > 2130-2200hrs head down to the nova in carlton > 2200-????hrs see spirited away Definitely has my vote :-) > we could do Hostname::Long on the following platforms for sure: > > OS Hardware > -- -------- > IRIX SGI Indy > Solaris Sun Ultra 5 > HP-UX HP9000 D-Class > > and with a bit of effort (and people who know what they are doing?) we > may also be able to do these: > > OpenVMS DEC VAX 3100 (needs OS install from cdrom) > AIX IBM RS6000 F50 (move from myi to lab, get on network) > FreeBSD intel box (needs OS install from cdrom) I also have my Mac OS X and it is already tested under Linux - so we are close to a full house. Anyone got a Windows box running Perl ? > Scott, can you describe what exactly needs to be done to get > Hostname::Long working of the different platforms? Can you give us some > code examples to prime us? :) Hostname::Long (one day I hope to have this integrated back into Hostname and just be part of perl core, but for now it has a separate name) is a module to get the fully qualified domain of the host you are on. Just like Hostname which goes through a number of methods to find out the current hostname of your machine, Hostname::Long does similar methods to get the full hostname of your machine. There is no standard for getting FQDN which is the reason for walking through so many methods. Scott -- Scott Penrose Welcome to the Digital Dimension http://www.dd.com.au/ scottp@dd.com.au Dismaimer: Contents of this mail and signature are bound to change randomly. Whilst every attempt has been made to control said randomness, the author wishes to remain blameless for the number of eggs that damn chicken laid. Oh and I don't want to hear about butterflies either. From Daniel at landmarksoftware.com.au Tue Jan 7 19:11:19 2003 From: Daniel at landmarksoftware.com.au (Daniel Walmsley) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab Message-ID: Foo has a Win98 box with Cygwin - that has Perl. Also, it's trivial to download and install ActiveState perl. They have a 5.8 distro now too. I like the plan, btw :-) Cheers, Dan -----Original Message----- From: Scott Penrose [mailto:scottp@dd.com.au] Sent: Wednesday, 8 January 2003 11:53 AM To: Gustaf Bjorksten Cc: Jens Porup; Melbourne Perl Mongers Subject: Re: Melb.PM to see Lord of the Nerdlab > > i would still like to have a go at scott's Hostname::Long thing, so my > proposal is: > > 1800hrs turn up @ Nerdlab > 1800-2000hrs work on Hostname::Long on various platforms* > 2000-2130hrs eat @ some place in chinatown > 2130-2200hrs head down to the nova in carlton > 2200-????hrs see spirited away Definitely has my vote :-) > we could do Hostname::Long on the following platforms for sure: > > OS Hardware > -- -------- > IRIX SGI Indy > Solaris Sun Ultra 5 > HP-UX HP9000 D-Class > > and with a bit of effort (and people who know what they are doing?) we > may also be able to do these: > > OpenVMS DEC VAX 3100 (needs OS install from cdrom) > AIX IBM RS6000 F50 (move from myi to lab, get on network) > FreeBSD intel box (needs OS install from cdrom) I also have my Mac OS X and it is already tested under Linux - so we are close to a full house. Anyone got a Windows box running Perl ? > Scott, can you describe what exactly needs to be done to get > Hostname::Long working of the different platforms? Can you give us some > code examples to prime us? :) Hostname::Long (one day I hope to have this integrated back into Hostname and just be part of perl core, but for now it has a separate name) is a module to get the fully qualified domain of the host you are on. Just like Hostname which goes through a number of methods to find out the current hostname of your machine, Hostname::Long does similar methods to get the full hostname of your machine. There is no standard for getting FQDN which is the reason for walking through so many methods. Scott -- Scott Penrose Welcome to the Digital Dimension http://www.dd.com.au/ scottp@dd.com.au Dismaimer: Contents of this mail and signature are bound to change randomly. Whilst every attempt has been made to control said randomness, the author wishes to remain blameless for the number of eggs that damn chicken laid. Oh and I don't want to hear about butterflies either. From crashkat at cmetech.com.au Tue Jan 7 19:53:13 2003 From: crashkat at cmetech.com.au (crashkat) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: On Wed, 8 Jan 2003, Daniel Walmsley wrote: > I like the plan, btw :-) Me too. K From jarich at perltraining.com.au Tue Jan 7 19:54:19 2003 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: > 1800hrs turn up @ Nerdlab > 1800-2000hrs work on Hostname::Long on various platforms* > 2000-2130hrs eat @ some place in chinatown > 2130-2200hrs head down to the nova in carlton > 2200-????hrs see spirited away The Nova is showing Spirited Away at 10:05pm and it goes for 124 minutes. Whilst seeing Spirited Away again certainly has appeal to me, although I would like to see LotR sometime too, 10pm is really getting on the late side. Does anyone have an alternative suggestion that might start in seeing the movie earlier? Unfortunately the only other showing of Spirited Away that I can see is again at the Nova but at 7:40pm. Perhaps those who aren't involved (and aren't interested in becomming involved - although it will be tonnes of fun) or who want an earlier night might like something like the following: 18?? hrs meet at a cinema to see desired movie 20?? hrs or thereabouts meet rest of PMers at some place in chinatown (lots of phone calls) end of dinner, head off to see Spirited Away (a movie which gets huge thumbs up) or head home. Movie options b/w 6pm and 7pm Die Another Day Hoyts 6:45pm - 10pm Harry Potter Nova 6:35pm - 9:15pm Village City 6:00pm - 8:40pm Rabbit Proof Fence Lumiere 6:15pm - 7:40pm Sweet Home Alabama Greater Union 6:30pm - 8:20pm The Lord of the Rings Nova 6:30pm - 9:30pm Treasure Planet Greater Union 6:35pm - 8:10pm Clearly the most likely options if we actually intend to all do dinner together are Sweet Home Alabama: "In order to marry her new fiancee, a New York fashion designer returns to Alabama to divorce the redneck husband she married in high school, and discovers she's still a Southern girl at heart. Stars Reese Witherspoon, Candice Bergen, Patrick Dempsey and Ethan Embry." (which doesn't really appeal to me) or Rabbit Proof Fence: "Based on the book by Doris Pilkington, this is the true story of three Aboriginal girls who were stolen from their families in 1931 to be assimilated into white culture as part of an official government policy. Unable to bear their torturous new life, they escape and embark on an epic journey to get back home, with the authorities chasing them all the way. Stars Everlyn Sampi, Tianna Sansbury, Laura Monaghan, Kenneth Branagh and Deborah Mailman." (apparently a great movie and one I wouldn't mind seeing some time) or Treasure Planet "A futuristic twist on Robert Louis Stevenson's Treasure Island, this animated film traces a teenager's fantastic journey across the universe as cabin boy aboard a majestic space galleon. Stars Joseph Gordon-Levitt, Brian Murray, Emma Thompson, David Hyde Pierce and Martin Short." (which might be worthwhile). Alternately we can all head to the nerdlab and split off from there as we each feel. Jacinta From crashkat at cmetech.com.au Tue Jan 7 20:47:51 2003 From: crashkat at cmetech.com.au (crashkat) Date: Wed Aug 4 00:02:48 2004 Subject: Melb.PM to see Lord of the Nerdlab In-Reply-To: Message-ID: On Wed, 8 Jan 2003, Jacinta Richardson wrote: > Perhaps those who aren't involved (and aren't interested in becomming > involved - although it will be tonnes of fun) or who want an earlier night > might like something like the following: > > 18?? hrs meet at a cinema to see desired movie > 20?? hrs or thereabouts meet rest of PMers at some place in chinatown > (lots of phone calls) > end of dinner, head off to see Spirited Away (a movie which gets huge > thumbs up) or head home. > > Alternately we can all head to the nerdlab and split off from there as we > each feel. > Yep, all are free to do what they like :) The lab will be open from 1800 to 2000. From there we (being me, foo, and any other takers (scott, danger?)) will being going with the plan suggested by foo. There's plenty of couch space at the lab, anyone wanting to socialise, drink beer, or whatever instead of programming is welcome (including partners). I'll probably be going with this option. My brain's still in "can't be bothered" mode and I'm savouring this untill I start my new job next week. We have 2 cats, one who is sociable and playfull and will entertain you for hours :) She even plays fetch. If people do want to organise an alternate itinerary (JC?) Then you're welcome to turn up at the lab any time between the two above said times to meet us, or call me (0409531036) to meet us elsewhere. A call before 2000 would be good if ppl want to meet us for dinner, just so we can get a table of the right size :) Cheers all :) crashkat From jarich at perltraining.com.au Tue Jan 7 22:28:56 2003 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Wed Aug 4 00:02:48 2004 Subject: People attending tonight In-Reply-To: Message-ID: crashkat said: > If people do want to organise an alternate itinerary (JC?) Then you're > welcome to turn up at the lab any time between the two above said times to > meet us, or call me (0409531036) to meet us elsewhere. > > A call before 2000 would be good if ppl want to meet us for dinner, just > so we can get a table of the right size :) I suggested alternate plans so I'm happy to organise them. If people who are interested in seeing a movie first and then having dinner with the rest of the PMers could drop me an email that'd be great. If noone emails me I'll assume that I was the only one with an objection to staying out so late and won't organise anything. Jacinta -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +613 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact@perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | From pjf at perltraining.com.au Wed Jan 8 00:55:18 2003 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed Aug 4 00:02:48 2004 Subject: I'm late! Message-ID: <20030108065518.GA6981@mukc.org.au> Yup, I'm late. Be there soon! -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 From emisario at solucionesdemercadeo.com Wed Jan 8 21:15:00 2003 From: emisario at solucionesdemercadeo.com (EMISARIO EMAIL MERGE) Date: Wed Aug 4 00:02:48 2004 Subject: E-MISARIO Software para E-Mail Merge Masivo Message-ID: <200301082215007632@192.168.0.1> S O F T W A R E E - M A I L M E R G E M A S I V O Y P E R S O N A L I Z A D O SOFTWARE PARA ENVIO DE E-MAIL MERGE MASIVO Y PERSONALIZADO. PUEDE BAJAR LA VERSION DE DEMOSTRACION DESDE http://bajebandera.cppcol.com/outdemo.html BAJE UNA PRESENTACION COMPLETA DESDE http://www.gucacia.com/download/presentacion.zip OBTENGA TODA LA INFORMACION EN EL SITIO http://www.bajebandera.com PRECIO DE TEMPORADA REBAJADO A US$99. Precio regular us$249 =================================================== remuevase enviando un mail a retirar@solucionesdemercadeo.com -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/melbourne-pm/attachments/20030108/3fa65d5f/attachment.htm From devueltos at lapromocion.com Thu Jan 9 13:17:04 2003 From: devueltos at lapromocion.com (Miami, Florida) Date: Wed Aug 4 00:02:48 2004 Subject: Una Gran Inversion Message-ID: <5.1.1.6.0.20030109090105.036ba098@192.168.5.1> -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/melbourne-pm/attachments/20030109/bf7b02b4/attachment.htm From scottp at dd.com.au Thu Jan 9 19:02:09 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval Message-ID: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> Thought I might share some wisdom on a common code error I have seen in my own code as well as others... DIE handlers are great to change so that you can gracefully tell the user. However you must remember that module writers tend to expect the die handler to actually do a die, and not an "print STDERR ...; exit 1;". It is common to find in module code things like... eval q{ use Fred; }; unless ($@) { print "Cool Fred exists on this machine"; } but of course with the DIE handler set this may fail to pick up the error, calling your DIE handler and exiting, when it should have continued. You probably find yourself often writing code like this eval { local $SIG{__DIE__} = sub { die $_[0] }; Do Stuff Here... }; print "Errors checking here" if ($@); Which correctly picks up errors in the eval. So us smart developers start doing our own local DIE handler along the lines of... eval q{ local $SIG{__DIE__} = sub { die $_[0] }; use Fred; }; unless ($@) { print "Cool Fred exists on this machine"; } Of course the problem with our little bit of code above is that when perl compiles our string it has not yet set the local die handler. So any errors in compile (eg: Fred does not exist as a module) causes the root DIE handler to get called, again missing the error and not handling it correctly. So the correct approach is of course... { local $SIG{__DIE__} = sub { die $_[0] }; eval q{ use Fred; }; unless ($@) { print "Cool Fred exists on this machine"; } } (ie: move the local $SIG{__DIE__} outside the string eval, but inside a block). This may seem very obvious to some, but you would be surprised how many times I have seen it done and then cause REALLY obscure errors when upgrading a CPAN module (Cache::Cache uses the eval q{ use ...} approach to check for modules, and does NOT set a local DIE handler) :-) Scott -- Scott Penrose Anthropomorphic Personification Expert http://search.cpan.org/search?author=SCOTT scott@cpan.org Dismaimer: While every attempt has been made to make sure that this email only contains zeros and ones, there has been no effort made to guarantee the quantity or the order. From david_dick at iprimus.com.au Thu Jan 9 22:17:25 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> References: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> Message-ID: <3E1E4955.10609@iprimus.com.au> i've never actually used a DIE handler before. Why would you use them? I understand that intercepting a exception thrown by a die and informing the user about it in a graceful fashion is a useful thing(tm), but i tend to use an eval block (or similar such as Error.pm) around the suspect code and a test afterwards. Is the DIE handler just another example of TIMTOWTDI, or does it have specific advantages/disadvantages (not merely gotchas) associated with it? -dave Scott Penrose wrote: > Thought I might share some wisdom on a common code error I have seen > in my own code as well as others... > > DIE handlers are great to change so that you can gracefully tell the > user. However you must remember that module writers tend to expect the > die handler to actually do a die, and not an "print STDERR ...; exit 1;". > > It is common to find in module code things like... > eval q{ > use Fred; > }; > unless ($@) { > print "Cool Fred exists on this machine"; > } > > but of course with the DIE handler set this may fail to pick up the > error, calling your DIE handler and exiting, when it should have > continued. > > You probably find yourself often writing code like this > > eval { > local $SIG{__DIE__} = sub { die $_[0] }; > Do Stuff Here... > }; > print "Errors checking here" if ($@); > > Which correctly picks up errors in the eval. > > So us smart developers start doing our own local DIE handler along the > lines of... > > eval q{ > local $SIG{__DIE__} = sub { die $_[0] }; > use Fred; > }; > unless ($@) { > print "Cool Fred exists on this machine"; > } > > Of course the problem with our little bit of code above is that when > perl compiles our string it has not yet set the local die handler. So > any errors in compile (eg: Fred does not exist as a module) causes the > root DIE handler to get called, again missing the error and not > handling it correctly. > > So the correct approach is of course... > { > local $SIG{__DIE__} = sub { die $_[0] }; > eval q{ > use Fred; > }; > unless ($@) { > print "Cool Fred exists on this machine"; > } > } > > (ie: move the local $SIG{__DIE__} outside the string eval, but inside > a block). > > This may seem very obvious to some, but you would be surprised how > many times I have seen it done and then cause REALLY obscure errors > when upgrading a CPAN module (Cache::Cache uses the eval q{ use ...} > approach to check for modules, and does NOT set a local DIE handler) > > :-) > > Scott From david_dick at iprimus.com.au Thu Jan 9 22:30:26 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <3E1E4955.10609@iprimus.com.au> References: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> <3E1E4955.10609@iprimus.com.au> Message-ID: <3E1E4C62.9020303@iprimus.com.au> Bugger, should have hit reply-all.... David Dick wrote: > i've never actually used a DIE handler before. Why would you use > them? I understand that intercepting a exception thrown by a die and > informing the user about it in a graceful fashion is a useful > thing(tm), but i tend to use an eval block (or similar such as > Error.pm) around the suspect code and a test afterwards. Is the DIE > handler just another example of TIMTOWTDI, or does it have specific > advantages/disadvantages (not merely gotchas) associated with it? > -dave > > Scott Penrose wrote: > >> Thought I might share some wisdom on a common code error I have seen >> in my own code as well as others... >> >> DIE handlers are great to change so that you can gracefully tell the >> user. However you must remember that module writers tend to expect >> the die handler to actually do a die, and not an "print STDERR ...; >> exit 1;". >> >> It is common to find in module code things like... >> eval q{ >> use Fred; >> }; >> unless ($@) { >> print "Cool Fred exists on this machine"; >> } >> >> but of course with the DIE handler set this may fail to pick up the >> error, calling your DIE handler and exiting, when it should have >> continued. >> >> You probably find yourself often writing code like this >> >> eval { >> local $SIG{__DIE__} = sub { die $_[0] }; >> Do Stuff Here... >> }; >> print "Errors checking here" if ($@); >> >> Which correctly picks up errors in the eval. >> >> So us smart developers start doing our own local DIE handler along >> the lines of... >> >> eval q{ >> local $SIG{__DIE__} = sub { die $_[0] }; >> use Fred; >> }; >> unless ($@) { >> print "Cool Fred exists on this machine"; >> } >> >> Of course the problem with our little bit of code above is that when >> perl compiles our string it has not yet set the local die handler. So >> any errors in compile (eg: Fred does not exist as a module) causes >> the root DIE handler to get called, again missing the error and not >> handling it correctly. >> >> So the correct approach is of course... >> { >> local $SIG{__DIE__} = sub { die $_[0] }; >> eval q{ >> use Fred; >> }; >> unless ($@) { >> print "Cool Fred exists on this machine"; >> } >> } >> >> (ie: move the local $SIG{__DIE__} outside the string eval, but inside >> a block). >> >> This may seem very obvious to some, but you would be surprised how >> many times I have seen it done and then cause REALLY obscure errors >> when upgrading a CPAN module (Cache::Cache uses the eval q{ use ...} >> approach to check for modules, and does NOT set a local DIE handler) >> >> :-) >> >> Scott > > > From skip at peterskipworth.com Thu Jan 9 22:56:33 2003 From: skip at peterskipworth.com (Peter Skipworth) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval References: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> <3E1E4955.10609@iprimus.com.au> <3E1E4C62.9020303@iprimus.com.au> Message-ID: <013001c2b864$a6210f20$9601a8c0@pc95> Erm - u did :) ----- Original Message ----- From: "David Dick" To: "Scott Penrose" Cc: Sent: Friday, January 10, 2003 3:30 PM Subject: Re: Hint on local DIE handlers in Eval > Bugger, should have hit reply-all.... > > David Dick wrote: > > > i've never actually used a DIE handler before. Why would you use > > them? I understand that intercepting a exception thrown by a die and > > informing the user about it in a graceful fashion is a useful > > thing(tm), but i tend to use an eval block (or similar such as > > Error.pm) around the suspect code and a test afterwards. Is the DIE > > handler just another example of TIMTOWTDI, or does it have specific > > advantages/disadvantages (not merely gotchas) associated with it? > > -dave > > > > Scott Penrose wrote: > > > >> Thought I might share some wisdom on a common code error I have seen > >> in my own code as well as others... > >> > >> DIE handlers are great to change so that you can gracefully tell the > >> user. However you must remember that module writers tend to expect > >> the die handler to actually do a die, and not an "print STDERR ...; > >> exit 1;". > >> > >> It is common to find in module code things like... > >> eval q{ > >> use Fred; > >> }; > >> unless ($@) { > >> print "Cool Fred exists on this machine"; > >> } > >> > >> but of course with the DIE handler set this may fail to pick up the > >> error, calling your DIE handler and exiting, when it should have > >> continued. > >> > >> You probably find yourself often writing code like this > >> > >> eval { > >> local $SIG{__DIE__} = sub { die $_[0] }; > >> Do Stuff Here... > >> }; > >> print "Errors checking here" if ($@); > >> > >> Which correctly picks up errors in the eval. > >> > >> So us smart developers start doing our own local DIE handler along > >> the lines of... > >> > >> eval q{ > >> local $SIG{__DIE__} = sub { die $_[0] }; > >> use Fred; > >> }; > >> unless ($@) { > >> print "Cool Fred exists on this machine"; > >> } > >> > >> Of course the problem with our little bit of code above is that when > >> perl compiles our string it has not yet set the local die handler. So > >> any errors in compile (eg: Fred does not exist as a module) causes > >> the root DIE handler to get called, again missing the error and not > >> handling it correctly. > >> > >> So the correct approach is of course... > >> { > >> local $SIG{__DIE__} = sub { die $_[0] }; > >> eval q{ > >> use Fred; > >> }; > >> unless ($@) { > >> print "Cool Fred exists on this machine"; > >> } > >> } > >> > >> (ie: move the local $SIG{__DIE__} outside the string eval, but inside > >> a block). > >> > >> This may seem very obvious to some, but you would be surprised how > >> many times I have seen it done and then cause REALLY obscure errors > >> when upgrading a CPAN module (Cache::Cache uses the eval q{ use ...} > >> approach to check for modules, and does NOT set a local DIE handler) > >> > >> :-) > >> > >> Scott > > > > > > > > From david_dick at iprimus.com.au Thu Jan 9 22:55:41 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <013001c2b864$a6210f20$9601a8c0@pc95> References: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> <3E1E4955.10609@iprimus.com.au> <3E1E4C62.9020303@iprimus.com.au> <013001c2b864$a6210f20$9601a8c0@pc95> Message-ID: <3E1E524D.4030209@iprimus.com.au> don't worry about me...... i'm _ok_..... *zonk* Peter Skipworth wrote: >Erm - u did :) > >----- Original Message ----- >From: "David Dick" >To: "Scott Penrose" >Cc: >Sent: Friday, January 10, 2003 3:30 PM >Subject: Re: Hint on local DIE handlers in Eval > > > > >>Bugger, should have hit reply-all.... >> >>David Dick wrote: >> >> >> >>>i've never actually used a DIE handler before. Why would you use >>>them? I understand that intercepting a exception thrown by a die and >>>informing the user about it in a graceful fashion is a useful >>>thing(tm), but i tend to use an eval block (or similar such as >>>Error.pm) around the suspect code and a test afterwards. Is the DIE >>>handler just another example of TIMTOWTDI, or does it have specific >>>advantages/disadvantages (not merely gotchas) associated with it? >>>-dave >>> >>>Scott Penrose wrote: >>> >>> >>> >>>>Thought I might share some wisdom on a common code error I have seen >>>>in my own code as well as others... >>>> >>>>DIE handlers are great to change so that you can gracefully tell the >>>>user. However you must remember that module writers tend to expect >>>>the die handler to actually do a die, and not an "print STDERR ...; >>>>exit 1;". >>>> >>>>It is common to find in module code things like... >>>> eval q{ >>>> use Fred; >>>> }; >>>> unless ($@) { >>>> print "Cool Fred exists on this machine"; >>>> } >>>> >>>>but of course with the DIE handler set this may fail to pick up the >>>>error, calling your DIE handler and exiting, when it should have >>>>continued. >>>> >>>>You probably find yourself often writing code like this >>>> >>>> eval { >>>> local $SIG{__DIE__} = sub { die $_[0] }; >>>> Do Stuff Here... >>>> }; >>>> print "Errors checking here" if ($@); >>>> >>>>Which correctly picks up errors in the eval. >>>> >>>>So us smart developers start doing our own local DIE handler along >>>>the lines of... >>>> >>>> eval q{ >>>> local $SIG{__DIE__} = sub { die $_[0] }; >>>> use Fred; >>>> }; >>>> unless ($@) { >>>> print "Cool Fred exists on this machine"; >>>> } >>>> >>>>Of course the problem with our little bit of code above is that when >>>>perl compiles our string it has not yet set the local die handler. So >>>>any errors in compile (eg: Fred does not exist as a module) causes >>>>the root DIE handler to get called, again missing the error and not >>>>handling it correctly. >>>> >>>>So the correct approach is of course... >>>> { >>>> local $SIG{__DIE__} = sub { die $_[0] }; >>>> eval q{ >>>> use Fred; >>>> }; >>>> unless ($@) { >>>> print "Cool Fred exists on this machine"; >>>> } >>>> } >>>> >>>>(ie: move the local $SIG{__DIE__} outside the string eval, but inside >>>>a block). >>>> >>>>This may seem very obvious to some, but you would be surprised how >>>>many times I have seen it done and then cause REALLY obscure errors >>>>when upgrading a CPAN module (Cache::Cache uses the eval q{ use ...} >>>>approach to check for modules, and does NOT set a local DIE handler) >>>> >>>>:-) >>>> >>>>Scott >>>> >>>> >>> >>> >>> >> >> > > > > From pjf at perltraining.com.au Thu Jan 9 23:27:56 2003 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <3E1E4C62.9020303@iprimus.com.au> References: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> <3E1E4955.10609@iprimus.com.au> <3E1E4C62.9020303@iprimus.com.au> Message-ID: <20030110052756.GE29320@mukc.org.au> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 G'day David, On Fri, Jan 10, 2003 at 03:30:26PM +1100, David Dick wrote: > >i've never actually used a DIE handler before. Why would you use > >them? I understand that intercepting a exception thrown by a die and > >informing the user about it in a graceful fashion is a useful > >thing(tm), but i tend to use an eval block (or similar such as > >Error.pm) around the suspect code and a test afterwards. Is the DIE > >handler just another example of TIMTOWTDI, or does it have specific > >advantages/disadvantages (not merely gotchas) associated with it? > >-dave Using a die handler is useful when the regular behavior of die is not acceptable. An example might be when you want a fatal error to perform a special action (SMS some poor programmer), or when you're writing a CGI script and want fatal errors to go someplace other than the regular error log. A die handler may also have use in performing clean-up, such as closing connections or rolling back transactions in progress. However, as pointed out by Scott, just because you're in a die handler doesn't mean your program is going to halt anytime soon. I'd *strongly* recommend the use of END {} blocks to perform any final clean-up you want done on program exit. One of the big problems with die handlers is that people don't expect them to be changed, hence the need for the rather careful footwork seen in Scott's examples. I'd recommend not touching die handlers at all if you can help it, and if you *do* need to play with them, restrict them to logging and/or modifying the message in question (eg, to wrap it up in an exception object), and then re-throwing the die. Cheers, Paul - -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.6 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE+Hlncx5N6j7FHnlURAkB9AJkBBJEW/bREOp7Yt//b+tFitzxMgACfZHKu g3niS1n8iZeRjq8Rh7tJFmc= =gud0 -----END PGP SIGNATURE----- From scottp at dd.com.au Thu Jan 9 23:35:01 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <3E1E4955.10609@iprimus.com.au> Message-ID: <43C815C0-245D-11D7-A9A4-003065B58CF8@dd.com.au> On Friday, Jan 10, 2003, at 15:17 Australia/Melbourne, David Dick wrote: > i've never actually used a DIE handler before. Why would you use > them? I understand that intercepting a exception thrown by a die and > informing the user about it in a graceful fashion is a useful > thing(tm), but i tend to use an eval block (or similar such as > Error.pm) around the suspect code and a test afterwards. Is the DIE > handler just another example of TIMTOWTDI, or does it have specific > advantages/disadvantages (not merely gotchas) associated with it? > -dave Well, I guess I could write my code like this... eval { Here is ALL my code !!! }; if ($@) { Nice error messages here for users to see } and that would probably work too The reasons for doing it can be a little more subtle. Most notably we tend to write code that looks a little like this... use MyErrorCode; ... In the MyErrorCode we can then put a die handler, it would not be possible (without code rewrite) to then wrap an eval around the code it is used in. I believe in fact that this is how Error works :-) Yep just checked it. What I was demonstrating is what Error does. But it is still an important lesson even when using Error as you can easily break Error with the wrong DIE handler etc :-) Another reason is simplicity (not only for the use I did above) but also cause I can do things like this at the start of someone else' cgi script $SIG{__DIE__} = sub { print MYLOG "$0 error - $_[0]"; die $_[0]; }; This is of course a silly example as I have just logged twice :-) but has some point, eg: you may have wanted to use SysLog. Another reason to learn this stuff is how others work. eg: If you 'use CGI' CGI can create a DIE handler for you. Scott -- Scott Penrose VP in charge of Pancakes http://linux.dd.com.au/ scottp@dd.com.au Dismaimer: If you receive this email in error - please eat it immediately to prevent it from falling into the wrong hands. From scottp at dd.com.au Thu Jan 9 23:36:46 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <20030110052756.GE29320@mukc.org.au> Message-ID: <8254721A-245D-11D7-A9A4-003065B58CF8@dd.com.au> > One of the big problems with die handlers is that people don't > expect them to be changed, hence the need for the rather > careful footwork seen in Scott's examples. I'd recommend not > touching die handlers at all if you can help it, and if you > *do* need to play with them, restrict them to logging and/or > modifying the message in question (eg, to wrap it up in an > exception object), and then re-throwing the die. Here is the best advice to follow, especially the last line ! Scott -- Scott Penrose Anthropomorphic Personification Expert http://search.cpan.org/search?author=SCOTT scott@cpan.org Dismaimer: While every attempt has been made to make sure that this email only contains zeros and ones, there has been no effort made to guarantee the quantity or the order. From david_dick at iprimus.com.au Thu Jan 9 23:41:24 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <20030110052756.GE29320@mukc.org.au> References: <25669D82-2437-11D7-A9A4-003065B58CF8@dd.com.au> <3E1E4955.10609@iprimus.com.au> <3E1E4C62.9020303@iprimus.com.au> <20030110052756.GE29320@mukc.org.au> Message-ID: <3E1E5D04.7050204@iprimus.com.au> > > >Using a die handler is useful when the regular behavior of die >is not acceptable. An example might be when you want a fatal >error to perform a special action (SMS some poor programmer), >or when you're writing a CGI script and want fatal errors to >go someplace other than the regular error log. > > ok, coherence probably is not my long suit today... :) I'm just not sure I understand the difference between a) { local SIG{'__DIE__'} = &handle_error(@_); die "Whoops"; } and b) eval { die "Whoops"; }; if ($@) { &handle_error($@); } *praying* that the code above is vaguely correct, the two structures seem to have on the surface at least, quite different ways of going after the problem of catching the exception. I was just wondering if there was an advantage (beyond situational "it felt right/wanted to upset the maintenance coder" sort of thing) to using one technique or the other. As you and Scott have pointed out, use a DIE handler seems to be a downright scary way of handling exceptions, is there _any_ advantage to it at all? Should exterminating this structure where-ever possible be regarded as a mercy killing? :) Cheers -dave >A die handler may also have use in performing clean-up, such as >closing connections or rolling back transactions in progress. >However, as pointed out by Scott, just because you're in a die >handler doesn't mean your program is going to halt anytime soon. >I'd *strongly* recommend the use of END {} blocks to perform any >final clean-up you want done on program exit. > >One of the big problems with die handlers is that people don't >expect them to be changed, hence the need for the rather >careful footwork seen in Scott's examples. I'd recommend not >touching die handlers at all if you can help it, and if you >*do* need to play with them, restrict them to logging and/or >modifying the message in question (eg, to wrap it up in an >exception object), and then re-throwing the die. > >Cheers, > > Paul > >- -- >Paul Fenwick | http://perltraining.com.au/ >Director of Training | Ph: +61 3 9354 6001 >Perl Training Australia | Fax: +61 3 9354 2681 >-----BEGIN PGP SIGNATURE----- >Version: GnuPG v1.0.6 (GNU/Linux) >Comment: For info see http://www.gnupg.org > >iD8DBQE+Hlncx5N6j7FHnlURAkB9AJkBBJEW/bREOp7Yt//b+tFitzxMgACfZHKu >g3niS1n8iZeRjq8Rh7tJFmc= >=gud0 >-----END PGP SIGNATURE----- > > > From david_dick at iprimus.com.au Thu Jan 9 23:44:43 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:48 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <43C815C0-245D-11D7-A9A4-003065B58CF8@dd.com.au> References: <43C815C0-245D-11D7-A9A4-003065B58CF8@dd.com.au> Message-ID: <3E1E5DCB.7000803@iprimus.com.au> sorted. thanks scott. Scott Penrose wrote: > > On Friday, Jan 10, 2003, at 15:17 Australia/Melbourne, David Dick wrote: > >> i've never actually used a DIE handler before. Why would you use >> them? I understand that intercepting a exception thrown by a die and >> informing the user about it in a graceful fashion is a useful >> thing(tm), but i tend to use an eval block (or similar such as >> Error.pm) around the suspect code and a test afterwards. Is the DIE >> handler just another example of TIMTOWTDI, or does it have specific >> advantages/disadvantages (not merely gotchas) associated with it? >> -dave > > > Well, I guess I could write my code like this... > > eval { > Here is ALL my code !!! > }; > if ($@) { > Nice error messages here for users to see > } > > and that would probably work too > > The reasons for doing it can be a little more subtle. > > Most notably we tend to write code that looks a little like this... > > use MyErrorCode; > > ... > > In the MyErrorCode we can then put a die handler, it would not be > possible (without code rewrite) to then wrap an eval around the code > it is used in. I believe in fact that this is how Error works :-) Yep > just checked it. What I was demonstrating is what Error does. But it > is still an important lesson even when using Error as you can easily > break Error with the wrong DIE handler etc :-) > > Another reason is simplicity (not only for the use I did above) but > also cause I can do things like this at the start of someone else' cgi > script > > $SIG{__DIE__} = sub { > print MYLOG "$0 error - $_[0]"; > die $_[0]; > }; > > This is of course a silly example as I have just logged twice :-) but > has some point, eg: you may have wanted to use SysLog. > > Another reason to learn this stuff is how others work. eg: If you 'use > CGI' CGI can create a DIE handler for you. > > Scott From gustaf at cmetech.com.au Fri Jan 10 00:07:54 2003 From: gustaf at cmetech.com.au (Gustaf Bjorksten) Date: Wed Aug 4 00:02:49 2004 Subject: Hint on local DIE handlers in Eval In-Reply-To: <8254721A-245D-11D7-A9A4-003065B58CF8@dd.com.au> Message-ID: On Fri, 10 Jan 2003, Scott Penrose wrote: > > One of the big problems with die handlers is that people don't > > expect them to be changed, hence the need for the rather > > careful footwork seen in Scott's examples. I'd recommend not > > touching die handlers at all if you can help it, and if you > > *do* need to play with them, restrict them to logging and/or > > modifying the message in question (eg, to wrap it up in an > > exception object), and then re-throwing the die. > > Here is the best advice to follow, especially the last line ! > > Scott Ahhh, bugger! Now you've made me want to go back and examine all the die handlers in our stats code :( L8rz, Foobard - Jester from the Court of Chaos Net Cens0rship = Book Burning in the Digital Age http://www.efa.org.au/ From webmaster at tupincho.net Thu Jan 16 15:06:48 2003 From: webmaster at tupincho.net (Tupincho.net - Esteroides anabólicos (Uruguay)) Date: Wed Aug 4 00:02:49 2004 Subject: El mejor portal de esteroides, ejercicios y nutrición Message-ID: An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/melbourne-pm/attachments/20030116/3a7222e7/attachment.htm From devueltos at lapromocion.com Thu Jan 16 15:55:14 2003 From: devueltos at lapromocion.com (Franquicia Internet) Date: Wed Aug 4 00:02:49 2004 Subject: Excelente Inversion Message-ID: <5.1.1.6.0.20030116150101.039ff108@192.168.5.1> -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/melbourne-pm/attachments/20030116/0d622449/attachment.htm From felishag at thenetanywhere.com Sat Jan 18 23:24:02 2003 From: felishag at thenetanywhere.com (felishag@thenetanywhere.com) Date: Wed Aug 4 00:02:49 2004 Subject: Rated NO.1 Penis Enlargement Pill On The Market! Message-ID: <200301190524.FAA26606@oberon.worldonline.nl> Below is the result of your feedback form. It was submitted by felishag@thenetanywhere.com (felishag@thenetanywhere.com) on Sunday, January 19, 2003 at 06:24:02 --------------------------------------------------------------------------- ypq: Rated NO.1 Penis Enlargement Pill On The Market! * Gain Up To 3 Full Inches In Length
* Expand Your Penis Up To 20% Thicker
* Stop Premature Ejaculation!
* Produce Stronger, Rock Hard Erections
* 100% Safe To Take, With NO Side Effects
* Fast Priority Fed-Ex Shipping WorldWide
* Doctor Approved And Recommended
* No Pumps! No Surgery! No Exercises!
* 100% Money Back Guarantee
* FREE Bottle Of VP-RX Worth Over $50
* FREE "Male Help E-Book" Worth Over $50


Click here to view our site or paste http://www.fasthost.bz/pink/pp/ into your web browser!



You are receiving this email as part of an Internet mailing list. If you wish to opt-out, and not receive any more emails from us, please go to OPT-OUT. pplyd --------------------------------------------------------------------------- From send at xactmailer.net Sun Jan 26 23:44:04 2003 From: send at xactmailer.net (0% Interest MasterCard®) Date: Wed Aug 4 00:02:49 2004 Subject: ADV: MasterCard®, No Interest Ever. Everyone Qualifies, Guaranteed Message-ID: <200301270544.h0R5i1t13732@mail.pm.org> An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/melbourne-pm/attachments/20030126/7be8712c/attachment.htm From paul.bongiorno at hp.com Thu Jan 30 17:06:12 2003 From: paul.bongiorno at hp.com (BONGIORNO,PAUL (HP-Australia,ex2)) Date: Wed Aug 4 00:02:49 2004 Subject: Variable declarations Message-ID: Someone asked me at work if you could declare multiple variables and initialise them in one line for example My $a, $b, $c = 0; I realise I could do something similar like My ($a, $b, $c) = (0, 0, 0); After hearing Daimien I just didn't believe there was not a way it could be done - weather or not is should be is probably another question. Thanks, Paul From skip at peterskipworth.com Thu Jan 30 17:24:21 2003 From: skip at peterskipworth.com (Peter Skipworth) Date: Wed Aug 4 00:02:49 2004 Subject: Variable declarations References: Message-ID: <007701c2c8b6$b8cf6d80$9601a8c0@pc95> my $a = my $b = my $c = 1; That works and is perfectly valid AFAIK, as is my ($a, $b, $c)=(1,1,1); I don't think there's any shorter way of doing it properly... $a = $b = $c = 1 also works, but assumes your vars have already been declared of course... Cheers, P ----- Original Message ----- From: "BONGIORNO,PAUL (HP-Australia,ex2)" To: Sent: Friday, January 31, 2003 10:06 AM Subject: Variable declarations > Someone asked me at work if you could declare multiple variables and > initialise them in one line for example > > My $a, $b, $c = 0; > > I realise I could do something similar like > > My ($a, $b, $c) = (0, 0, 0); > > After hearing Daimien I just didn't believe there was not a way it could be > done - weather or not is should be is probably another question. > > Thanks, > > Paul > > > > From stas at stason.org Thu Jan 30 19:03:04 2003 From: stas at stason.org (Stas Bekman) Date: Wed Aug 4 00:02:49 2004 Subject: modperl Message-ID: <3E39CB48.1070108@stason.org> Hi, I've moved to Melbourne recently and will be staying for awhile, and though I've missed your NY get together, I'd love to come to the next mongers meeting. That's said, I can give some mod_perl (1|2).0 presentation(s) if there is an interest. __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:stas@stason.org http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com From stas at stason.org Thu Jan 30 19:05:42 2003 From: stas at stason.org (Stas Bekman) Date: Wed Aug 4 00:02:49 2004 Subject: Variable declarations References: <007701c2c8b6$b8cf6d80$9601a8c0@pc95> Message-ID: <3E39CBE6.6050203@stason.org> Peter Skipworth wrote: > my $a = my $b = my $c = 1; > > That works and is perfectly valid AFAIK, as is my ($a, $b, $c)=(1,1,1); > > I don't think there's any shorter way of doing it properly... > > $a = $b = $c = 1 also works, but assumes your vars have already been > declared of course... /home/stas> perl -lwe 'my($a, $b, $c) = (0) x 3; print "$a $b $c"' 0 0 0 __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:stas@stason.org http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com From pjf at perltraining.com.au Thu Jan 30 19:15:10 2003 From: pjf at perltraining.com.au (Paul Fenwick) Date: Wed Aug 4 00:02:49 2004 Subject: modperl In-Reply-To: <3E39CB48.1070108@stason.org> References: <3E39CB48.1070108@stason.org> Message-ID: <20030131011510.GA13627@mukc.org.au> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 G'day Stas, On Fri, Jan 31, 2003 at 12:03:04PM +1100, Stas Bekman wrote: > I've moved to Melbourne recently and will be staying for awhile, and though > I've missed your NY get together, I'd love to come to the next mongers > meeting. > > That's said, I can give some mod_perl (1|2).0 presentation(s) if there is > an interest. Absolutely! I think a mod_perl talk would be fantastic, and as I'm certain it's my turn to arrange speakers for the month of February, I hereby pronounce you a speaker for the next meeting. :) Cheers, Paul - -- Paul Fenwick | http://perltraining.com.au/ Director of Training | Ph: +61 3 9354 6001 Perl Training Australia | Fax: +61 3 9354 2681 -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.6 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE+Oc4ex5N6j7FHnlURAvb4AJ4+K1rvxnqmvTPSPCYXzZeu+lYfCgCfUmDl nhoa7+ZYdQ6BpuzSF7/FQic= =hS/S -----END PGP SIGNATURE----- From scottp at dd.com.au Thu Jan 30 19:37:06 2003 From: scottp at dd.com.au (Scott Penrose) Date: Wed Aug 4 00:02:49 2004 Subject: modperl In-Reply-To: <20030131011510.GA13627@mukc.org.au> Message-ID: <81F57FF4-34BC-11D7-9D5B-003065B58CF8@dd.com.au> On Friday, Jan 31, 2003, at 12:15 Australia/Melbourne, Paul Fenwick wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > G'day Stas, > > On Fri, Jan 31, 2003 at 12:03:04PM +1100, Stas Bekman wrote: > >> I've moved to Melbourne recently and will be staying for awhile, and >> though >> I've missed your NY get together, I'd love to come to the next mongers >> meeting. >> >> That's said, I can give some mod_perl (1|2).0 presentation(s) if >> there is >> an interest. > > Absolutely! I think a mod_perl talk would be fantastic, and as > I'm certain it's my turn to arrange speakers for the month of > February, I hereby pronounce you a speaker for the next meeting. :) > The Feb meeting was already organised last year and I will post out details of that soon. So if March is free that would be a great talk Scott > Cheers, > > Paul > > - -- > Paul Fenwick | http://perltraining.com.au/ > Director of Training | Ph: +61 3 9354 6001 > Perl Training Australia | Fax: +61 3 9354 2681 > -----BEGIN PGP SIGNATURE----- > Version: GnuPG v1.0.6 (GNU/Linux) > Comment: For info see http://www.gnupg.org > > iD8DBQE+Oc4ex5N6j7FHnlURAvb4AJ4+K1rvxnqmvTPSPCYXzZeu+lYfCgCfUmDl > nhoa7+ZYdQ6BpuzSF7/FQic= > =hS/S > -----END PGP SIGNATURE----- > > > -- Scott Penrose Welcome to the Digital Dimension http://www.dd.com.au/ scottp@dd.com.au Dismaimer: Contents of this mail and signature are bound to change randomly. Whilst every attempt has been made to control said randomness, the author wishes to remain blameless for the number of eggs that damn chicken laid. Oh and I don't want to hear about butterflies either. From stas at stason.org Thu Jan 30 19:41:37 2003 From: stas at stason.org (Stas Bekman) Date: Wed Aug 4 00:02:49 2004 Subject: modperl References: <81F57FF4-34BC-11D7-9D5B-003065B58CF8@dd.com.au> Message-ID: <3E39D451.9010104@stason.org> >>> That's said, I can give some mod_perl (1|2).0 presentation(s) if >>> there is >>> an interest. >> >> >> Absolutely! I think a mod_perl talk would be fantastic, and as >> I'm certain it's my turn to arrange speakers for the month of >> February, I hereby pronounce you a speaker for the next meeting. :) >> > > The Feb meeting was already organised last year and I will post out > details of that soon. So if March is free that would be a great talk Please be more specific about what do you want to hear. I've material that will suffice for several full days tutorials. Perhaps I can suggest that talking about the new features of mod_perl 2.0 would be the most interesting. 1.5-2 hours would be a good timeframe if you want to see examples and demos and have time to ask questions. __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:stas@stason.org http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com From david_dick at iprimus.com.au Thu Jan 30 20:03:59 2003 From: david_dick at iprimus.com.au (David Dick) Date: Wed Aug 4 00:02:49 2004 Subject: modperl In-Reply-To: <3E39D451.9010104@stason.org> References: <81F57FF4-34BC-11D7-9D5B-003065B58CF8@dd.com.au> <3E39D451.9010104@stason.org> Message-ID: <3E39D98F.8040202@iprimus.com.au> Talk about whatever you find the most interesting.... :) Failing that, speaking for myself, I'd be interested in what I would need to do to convert my mod_perl scripts to mod_perl 2 and what the advantages and disadvantages are. Uru -Dave Stas Bekman wrote: > >>>> That's said, I can give some mod_perl (1|2).0 presentation(s) if >>>> there is >>>> an interest. >>> >>> >>> >>> Absolutely! I think a mod_perl talk would be fantastic, and as >>> I'm certain it's my turn to arrange speakers for the month of >>> February, I hereby pronounce you a speaker for the next meeting. :) >>> >> >> The Feb meeting was already organised last year and I will post out >> details of that soon. So if March is free that would be a great talk > > > Please be more specific about what do you want to hear. I've material > that will suffice for several full days tutorials. > > Perhaps I can suggest that talking about the new features of mod_perl > 2.0 would be the most interesting. 1.5-2 hours would be a good > timeframe if you want to see examples and demos and have time to ask > questions. > > __________________________________________________________________ > Stas Bekman JAm_pH ------> Just Another mod_perl Hacker > http://stason.org/ mod_perl Guide ---> http://perl.apache.org > mailto:stas@stason.org http://use.perl.org http://apacheweek.com > http://modperlbook.org http://apache.org http://ticketmaster.com > > From kerry at kseibold.com Thu Jan 30 21:05:33 2003 From: kerry at kseibold.com (Kerry Seibold) Date: Wed Aug 4 00:02:49 2004 Subject: perl scripts hang after migration to apache2.0.40 Message-ID: <101901c2c8d5$9ed147e0$86a9a8c0@jukebox> Hi All, I am setting up a new box to migrate my webserver to. Existing server is RH7.1 Apache 1.3.19: webserver works fine. New server (hostname webserver2): Have installed RH8 with Apache2.0.40. Have copied the complete /var/www from old to new. Have cut and paste and setup /etc/httpd/conf/httpd.conf and this tests ok. (httpd -t returns "Syntax OK"). Testing the webserver on my lan, plain old html pages are served up ok, but some CGI's (Perl) serve back some data, then the browser just hangs waiting for more data. Apache error log file says: [Fri Jan 31 10:04:46 2003] [error] [client 127.0.0.1] (20507)The timeout specified has expired: ap_content_length_filter: apr_bucket_read() failed. I am using perl5, apache mod-perl, cgi-lib.pl. I have searched on google, and tried apache.org, and searched my perl-mongers archives, but can't find any clues. I selected a script to try to find out where the script appears to be hanging by inserting: print "ok to here #DEBUG
"; print ""; exit; It seems to depend on how many variables have been declared?? Does anybody have ideas about what the solution is? Thanks, Kerry. From carolyn at bannoy.net Thu Jan 30 21:53:03 2003 From: carolyn at bannoy.net (Carolyn Hicks) Date: Wed Aug 4 00:02:49 2004 Subject: perl scripts hang after migration to apache2.0.40 In-Reply-To: <101901c2c8d5$9ed147e0$86a9a8c0@jukebox>; from kerry@kseibold.com on Fri, Jan 31, 2003 at 02:05:33PM +1100 References: <101901c2c8d5$9ed147e0$86a9a8c0@jukebox> Message-ID: <20030131145302.D2661@bannoy.net> On Fri, Jan 31, 2003 at 02:05:33PM +1100, Kerry Seibold wrote: > Hi All, > I am setting up a new box to migrate my webserver to. > Existing server is RH7.1 Apache 1.3.19: webserver works fine. > New server (hostname webserver2): Have installed RH8 with Apache2.0.40. ... > I am using perl5, apache mod-perl, cgi-lib.pl. I believe migrating to Apache 2 means switching from mod_perl 1 to mod_perl 2, which changes a lot of stuff. Have a read of this: http://perl.apache.org/docs/2.0/user/compat/compat.html Looks like including "use Apache::compat" in your scripts might help. -carolyn From stas at stason.org Thu Jan 30 23:01:35 2003 From: stas at stason.org (Stas Bekman) Date: Wed Aug 4 00:02:49 2004 Subject: perl scripts hang after migration to apache2.0.40 References: <101901c2c8d5$9ed147e0$86a9a8c0@jukebox> Message-ID: <3E3A032F.5020800@stason.org> Kerry Seibold wrote: > Hi All, > I am setting up a new box to migrate my webserver to. > Existing server is RH7.1 Apache 1.3.19: webserver works fine. > New server (hostname webserver2): Have installed RH8 with Apache2.0.40. > Have copied the complete /var/www from old to new. > Have cut and paste and setup /etc/httpd/conf/httpd.conf and this tests ok. > (httpd -t returns "Syntax OK"). > > Testing the webserver on my lan, plain old html pages are served up ok, but > some CGI's (Perl) serve back some data, > then the browser just hangs waiting for more data. > Apache error log file says: > > [Fri Jan 31 10:04:46 2003] [error] [client 127.0.0.1] (20507)The timeout > specified has expired: ap_content_length_filter: apr_bucket_read() failed. > > I am using perl5, apache mod-perl, cgi-lib.pl. > > I have searched on google, and tried apache.org, and searched my > perl-mongers archives, but can't find any clues. > > I selected a script to try to find out where the script appears to be > hanging by inserting: > print "ok to here #DEBUG
"; > print ""; > exit; > > It seems to depend on how many variables have been declared?? > > Does anybody have ideas about what the solution is? First of all RH8 comes with pretty old mod_perl and Apache, so the first thing to do is to grab the latest Apache 2.0.44 and mod_perl 1.99_08 and try again. If the problem is still there please post this question to the modperl list and we will take it from there. http://perl.apache.org/maillist/modperl.html#Subscription_Information Don't forget to complete the whole report as described here: http://perl.apache.org/docs/2.0/user/help/help.html#Reporting_Problems and include a short script that reproduces the problem and a relevant section of httpd.conf. But only after you have tried with the recent versions of Apache/mod_perl. __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:stas@stason.org http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com From jh_lists at fastmail.fm Thu Jan 30 23:11:15 2003 From: jh_lists at fastmail.fm (JP Howard) Date: Wed Aug 4 00:02:49 2004 Subject: modperl In-Reply-To: <3E39CB48.1070108@stason.org> References: <3E39CB48.1070108@stason.org> Message-ID: <20030131051115.B61F0438DC@server2.fastmail.fm> On Fri, 31 Jan 2003 12:03:04 +1100, "Stas Bekman" said: > I've moved to Melbourne recently and will be staying for awhile, and > though I've missed your NY get together, I'd love to come to the next mongers > meeting. > > That's said, I can give some mod_perl (1|2).0 presentation(s) if there is > an interest. > Stas, welcome to Melbourne, and congrats on all your great work for the mod_perl community! I personally would love to find out all about mod_perl 2.0, and what us old-fashioned v1 users have to know when it comes to porting to the new version... I'd also love to have a chance to buy you a drink to say thanks! Shoot me an email if you ever find yourself with nothing to do in an evening and I'll show you around. Cheers, Jeremy From stas at stason.org Thu Jan 30 23:37:09 2003 From: stas at stason.org (Stas Bekman) Date: Wed Aug 4 00:02:49 2004 Subject: modperl References: <3E39CB48.1070108@stason.org> <20030131051115.B61F0438DC@server2.fastmail.fm> Message-ID: <3E3A0B85.2000809@stason.org> JP Howard wrote: > On Fri, 31 Jan 2003 12:03:04 +1100, "Stas Bekman" said: > >>I've moved to Melbourne recently and will be staying for awhile, and >>though I've missed your NY get together, I'd love to come to the next mongers >>meeting. >> >>That's said, I can give some mod_perl (1|2).0 presentation(s) if there is >>an interest. >> > > Stas, welcome to Melbourne, and congrats on all your great work for the > mod_perl community! Thanks for the kind words, Jeremy ;) > I personally would love to find out all about mod_perl 2.0, and what us > old-fashioned v1 users have to know when it comes to porting to the new > version... There is a whole lot of new cool things to play with, and with 2.0 we take one more step closer to the world domination ;) Also we could certainly use help to test 2.0 on the real world apps. We are getting there... > I'd also love to have a chance to buy you a drink to say thanks! Shoot me > an email if you ever find yourself with nothing to do in an evening and > I'll show you around. If folks want to hang out before the next official meeting that would be totally cool as I don't know anybody in here ;) Though I already like this city very much! I'm staying at the Southbank and spend most of the time in the IBM Centre building, coding away, so if you in the area let me know. __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:stas@stason.org http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com