From alecclews at gmail.com Mon Jul 2 19:25:03 2007 From: alecclews at gmail.com (Alec Clews) Date: Tue, 3 Jul 2007 12:25:03 +1000 Subject: [Melbourne-pm] Fwd: [WSG Melbourne] Vic ICT for Women In-Reply-To: <337950078_81511421@mail.webboy.net> References: <337950078_81511421@mail.webboy.net> Message-ID: <3c2b63c00707021925u3fa66157x5227b91800764387@mail.gmail.com> Not sure if this if interest to any of the local Perl Chix ---------- Forwarded message ---------- From: Peter Firminger Date: 03-Jul-2007 11:56 Subject: [WSG Melbourne] Vic ICT for Women To: announce at wipa.org.au, melbourne-announce at webstandardsgroup.org Cc: enquiries at vicictforwomen.com.au ************************************************************** This is a one-way list for WSG Melbourne Announcements ************************************************************** To Whom it may concern, I am contacting you to advise of an upcoming Vic ICT for Women event that may be of interest to your members and broader network. "The Untapped Workforce: attracting women back into the industry" is presented by Jackie Cooke, Managing Director of Priorities - Flexible Employment Strategies, 12.30 - 2pm Thursday 19 July -tickets just $40 for non members. The event provides and excellent networking opportunity as well as insight into how companies can improve flexibility to attract and retain women. Vic ICT for Women is a non profit networking organisation supporting the entry, retention and progression of women working in the Information Communication Technology industry. The Network is a critical link between government, business, the education sector and other industry associations to collaborate on, and influence the direction of ICT in Victoria. It was established in response to a growing acknowledgement by government and the industry of the declining number of women entering the industry as well as the impact of current low participation levels on the skills base of ICT in Victoria. The Network represents a real desire by government, industry and vendors to 'invest in action' to address the skills gap and lack of interest in pursuing ICT careers by increasing awareness of the diversity of ICT roles. Kind regards Bianca Brownlow Manager Vic ICT for Women p: 03 9520 3515 f: 03 9520 3556 www.vicictforwomen.com.au ************************************************************** Guidelines: http://webstandardsgroup.org/mail/guidelines.cfm Unsubscribe: http://webstandardsgroup.org/join/unsubscribe.cfm Help: memberhelp at webstandardsgroup.org ************************************************************** -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/melbourne-pm/attachments/20070703/9452a988/attachment.html From d.godden at ioof.com.au Tue Jul 3 17:35:20 2007 From: d.godden at ioof.com.au (GODDEN, Dwayne) Date: Wed, 4 Jul 2007 10:35:20 +1000 Subject: [Melbourne-pm] Win32::Process Message-ID: Hello all. I need some help with Win32::Process. What I need is when the process die's ( on it's own ) I need to be restarted. Note this also runs in PerlSvc Code ------------------------------------------------------------------------ ------------------------------------ #!/usr/bin/perl -w use strict; package PerlSvc; use strict; use Win32::Process; our %Config; sub Startup { my $Process; my $smsgateway = PerlSvc::extract_bound_file('sms_gateway.exe'); Win32::Process::Create( $Process, $smsgateway, 'Sms_Gateway.exe', 0, NORMAL_PRIORITY_CLASS, "." ); while (ContinueRun(10)) { } $Process->Kill(0); } sub Pause { } sub Continue { } sub Interactive { } sub Help { } sub Install { $Config{ServiceName} = 'SMS_Server'; $Config{DisplayName} = 'SMS Gateway Server'; # add your additional install messages or functions here print "\nInstall compleate\n"; } sub Remove { $Config{ServiceName} = 'SMS_Server'; # add your additional remove messages or functions here print "\nSMS Server removed\n"; } package main; 1; Dwayne Godden Enterprise Engineer - Communication Specialist IOOF Investment Management ABN 53 006 695 021 AFS Licence No. 230 524 d.godden at ioof.com.au Phone 03 8614 4828 Fax 03 8614 4908 Mobile 0411 653 435 Level 10, 303 Collins Street, Melbourne VIC 3000 **************************************************************************** IMPORTANT - PLEASE READ This communication is intended only for the use of the addressee and may contain personal information, confidential information or legally privileged information. If personal information is contained in this e-mail, then it is governed by the Privacy Act 1988 and must be treated in accordance with the Privacy Act 1988 by the recipient. The legal privilege and confidentiality attached to this e-mail is not waivered, lost or destroyed by reason of mistaken delivery to you. If you are not the intended recipient, we would appreciate immediate notification by return e-mail or telephoning +61-3-8614-4444 and ask that the message be permanently deleted from your system. If you are the intended recipient of this communication you should not copy, disclose or distribute this communication without the authority of IOOF or its related entities (the IOOF Group). Any views expressed in this message are those of the individual sender, except where they are specifically stated to be the views of the IOOF Group. This e-mail and any attachments have been scanned for computer viruses using anti-viral software, but you should also perform your own scan. We do not accept liability for any loss or damage, whether caused by our own negligence or not, that results from a computer virus or a defect in the transmission of the e-mail or any attached file. **************************************************************************** -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/melbourne-pm/attachments/20070704/76d024db/attachment.html From ddick at aapt.net.au Wed Jul 4 05:11:46 2007 From: ddick at aapt.net.au (David Dick) Date: Wed, 04 Jul 2007 22:11:46 +1000 Subject: [Melbourne-pm] Win32::Process In-Reply-To: References: Message-ID: <468B8E82.5080406@aapt.net.au> GODDEN, Dwayne wrote: > > Hello all. > > I need some help with Win32::Process. > > What I need is when the process die?s ( on it?s own ) I need to be > restarted. > > Note this also runs in PerlSvc > Hi Dwayne, What part of Win32::Process is giving you grief? Cheers -Dave From jarich at perltraining.com.au Wed Jul 4 23:14:15 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Thu, 05 Jul 2007 16:14:15 +1000 Subject: [Melbourne-pm] Perl development job advertised on perl.net.au Message-ID: <468C8C37.9010302@perltraining.com.au> G'day everyone, A new job has just been added to the Melbourne Perl Mongers talk page: http://perl.net.au/wiki/Talk:Melbourne_Perl_Mongers I've included the details below. I don't know anything else about this job other than what it says. ---- Perl Developer required for 1 year fixed term contract Currently in the process of undertaking a large, organisational wide development an exciting opportunity for an experienced .Net Developer has arisen, to utilise their current skill set, and to build upon it in this dynamic up and coming organisation. In this role you will work across analysis, design, coding, testing and implementation of new developments, modifications and enhancements within the current domain. You will liaise with clients in regard to design and logic issues and develop and carry out unit and integration test plans. Support must also be provided for the development environment as well as for existing applications where required and regular feedback provided to supervisors on project progress and any issues encountered. As the successful candidate it is mandatory that you possess a solid understanding of Object Oriented methodologies using UML and demonstrable working experience of web technologies including Perl/CGI/PHP (mandatory for the role), HTML, XSLT, XML, Javascript and SQL. Linux system administration is also required along with UNIX scripting languages. It is expected that you possess strong communication skills along with the ability to work as a team player within a rapidly changing business environment. A working knowledge of use case modeling and testing, testing tools and a tertiary qualification in IT will also be highly regarded. Contact Matt Cargill - 03 8613 1335 Email - mcargill at hjb.com.au From skud at infotrope.net Wed Jul 4 23:15:55 2007 From: skud at infotrope.net (Kirrily Robert) Date: Thu, 5 Jul 2007 16:15:55 +1000 Subject: [Melbourne-pm] Meeting next week? Message-ID: Hey, do we have a meeting next Wednesday, July 11th? K. -- Kirrily Robert skud at infotrope.net http://infotrope.net From jarich at perltraining.com.au Wed Jul 4 23:21:22 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Thu, 05 Jul 2007 16:21:22 +1000 Subject: [Melbourne-pm] AGM minutes? Message-ID: <468C8DE2.6070706@perltraining.com.au> Are there AGM minutes floating around? Who got elected? 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 pjf at perltraining.com.au Thu Jul 5 03:09:14 2007 From: pjf at perltraining.com.au (Paul Fenwick) Date: Thu, 05 Jul 2007 20:09:14 +1000 Subject: [Melbourne-pm] AGM minutes? In-Reply-To: <468C8DE2.6070706@perltraining.com.au> References: <468C8DE2.6070706@perltraining.com.au> Message-ID: <468CC34A.3020201@perltraining.com.au> Jacinta Richardson wrote: > Are there AGM minutes floating around? Who got elected? These are on the wiki, with many thanks to Alec for posting them there: http://perl.net.au/wiki/Melbourne_Perl_Mongers/Meeting_History_2007 In short, I stepped down as Secretary, Alec became the new secretary, and the remainder of the positions that were filled remained the same. 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 alecclews at gmail.com Sun Jul 8 21:09:41 2007 From: alecclews at gmail.com (Alec Clews) Date: Mon, 09 Jul 2007 14:09:41 +1000 Subject: [Melbourne-pm] June Meeting this Wed Message-ID: <1183954181.28029.6.camel@tardis.vic.optushome.com.au> The 11th July meeting has snuck up on my unawares :-(, so I apologise for the short notice Does anyone have topics they would like to talk about? In the run up to OSDC 07 this is a great opportunity to practise any presentations you have proposed. -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From leif.eriksen at hpa.com.au Mon Jul 9 02:23:42 2007 From: leif.eriksen at hpa.com.au (leif.eriksen at hpa.com.au) Date: Mon, 9 Jul 2007 19:23:42 +1000 Subject: [Melbourne-pm] June Meeting this Wed Message-ID: <6462CBB658614845A7702E379880769802425F22@exhnat2.nsw.hpa> I can do an arm-waver - the talk will be what I hope to put into the OSDC2007 CFP, as soon as I can get some time. L > -----Original Message----- > From: alecclews at gmail.com [mailto:alecclews at gmail.com] > Sent: Monday, 9 July 2007 2:10 PM > To: melbourne-pm at pm.org > Subject: [Melbourne-pm] June Meeting this Wed > > The 11th July meeting has snuck up on my unawares :-(, so I > apologise for the short notice > > Does anyone have topics they would like to talk about? In the > run up to OSDC 07 this is a great opportunity to practise any > presentations you have proposed. > > > > > > -- > Alec Clews Melbourne, Australia. > Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C > blog:http://alecthegeek.wordpress.com/ > > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm > ********************************************************************** IMPORTANT The contents of this e-mail and its attachments are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you received this e-mail in error, please notify the HPA Postmaster, postmaster at hpa.com.au, then delete the e-mail. This footnote also confirms that this e-mail message has been swept for the presence of computer viruses by Ironport. Before opening or using any attachments, check them for viruses and defects. Our liability is limited to resupplying any affected attachments. HPA collects personal information to provide and market our services. For more information about use, disclosure and access see our Privacy Policy at www.hpa.com.au ********************************************************************** From alecclews at gmail.com Mon Jul 9 14:02:21 2007 From: alecclews at gmail.com (Alec Clews) Date: Tue, 10 Jul 2007 07:02:21 +1000 Subject: [Melbourne-pm] Perl Mongers Meeting: Wed 11 July 2007 Message-ID: <3c2b63c00707091402o63b8fa0dw6453c22f576a0e76@mail.gmail.com> G'day everyone, (with apologies for the short notice) You and all of your friends, family and other interested people are invited to our meeting Date: Wednesday 11th July 2007 Time: 6:30pm Location: Editure (Usual place) Level 8, 14 Blackwood Street, North Melbourne Talks: 1. Leif Eriksen: Topic TBA 2. Jacinda Richardson: Demonstration of the Regex Coach 3. Alec Clews: Enterprise Change Control with RT (abridged) There is also an ongoing discussion about the future of perl.net.au (see http://perl.net.au/wiki/Official_Perl_5_wiki_discussion) which we may continue at the meeting or the pub if anyone is interested. -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From alecclews at gmail.com Mon Jul 9 18:16:32 2007 From: alecclews at gmail.com (Alec Clews) Date: Tue, 10 Jul 2007 11:16:32 +1000 Subject: [Melbourne-pm] (Updated) Perl Mongers Meeting: Wed 11 July 2007 Message-ID: <3c2b63c00707091816u3d71e04ck65f6e3babc3c81bf@mail.gmail.com> G'day everyone, (We now have a title for Leif's presentation) You and all of your friends, family and other interested people are invited to our meeting Date: Wednesday 11th July 2007 Time: 6:30pm Location: Editure (Usual place) Level 8, 14 Blackwood Street, North Melbourne Talks: 1. Leif Eriksen: Testing database-driven apps without using a database 2. Jacinda Richardson: Demonstration of the Regex Coach 3. Alec Clews: Enterprise Change Control with RT (abridged) There is also an ongoing discussion about the future of perl.net.au (see http://perl.net.au/wiki/Official_Perl_5_wiki_discussion) which we may continue at the meeting or the pub if anyone is interested. -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From leif.eriksen at hpa.com.au Mon Jul 9 18:22:00 2007 From: leif.eriksen at hpa.com.au (leif.eriksen at hpa.com.au) Date: Tue, 10 Jul 2007 11:22:00 +1000 Subject: [Melbourne-pm] (Updated) Perl Mongers Meeting: Wed 11 July 2007 Message-ID: <6462CBB658614845A7702E379880769802425F4F@exhnat2.nsw.hpa> I'll just add that my title is a small lie intended to pique your curiosity - I intend to show how to test without all the infrastructure of a full-blown RDBMS like Oracle or MySQL. The resulting application should be easily portable to any RDBMS technology you care to choose. See you there Leif > -----Original Message----- > From: alecclews at gmail.com [mailto:alecclews at gmail.com] > Sent: Tuesday, 10 July 2007 11:17 AM > To: melbourne-pm at pm.org > Subject: [Melbourne-pm] (Updated) Perl Mongers Meeting: Wed > 11 July 2007 > > G'day everyone, > > (We now have a title for Leif's presentation) > > You and all of your friends, family and other interested > people are invited to our meeting > > Date: Wednesday 11th July 2007 > Time: 6:30pm > Location: Editure > (Usual place) > Level 8, 14 Blackwood Street, North Melbourne > > Talks: > > 1. Leif Eriksen: Testing database-driven apps > without using a database > > 2. Jacinda Richardson: Demonstration of the Regex Coach > > 3. Alec Clews: Enterprise Change Control with RT (abridged) > > There is also an ongoing discussion about the future of > perl.net.au (see > http://perl.net.au/wiki/Official_Perl_5_wiki_discussion) > which we may continue at the meeting or the pub if anyone is > interested. > > -- > Alec Clews Melbourne, Australia. > Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C > blog:http://alecthegeek.wordpress.com/ > > > -- > Alec Clews Melbourne, Australia. > Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C > blog:http://alecthegeek.wordpress.com/ > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm > ********************************************************************** IMPORTANT The contents of this e-mail and its attachments are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you received this e-mail in error, please notify the HPA Postmaster, postmaster at hpa.com.au, then delete the e-mail. This footnote also confirms that this e-mail message has been swept for the presence of computer viruses by Ironport. Before opening or using any attachments, check them for viruses and defects. Our liability is limited to resupplying any affected attachments. HPA collects personal information to provide and market our services. For more information about use, disclosure and access see our Privacy Policy at www.hpa.com.au ********************************************************************** From pjf at perltraining.com.au Mon Jul 9 19:04:11 2007 From: pjf at perltraining.com.au (Paul Fenwick) Date: Tue, 10 Jul 2007 12:04:11 +1000 Subject: [Melbourne-pm] RFC: PerlNet and the Perl 5 wiki Message-ID: <4692E91B.3010305@perltraining.com.au> G'day everyone, There's been a bit of discussion recently with a new Perl 5 wiki that can be found at: http://perlfoundation.org/perl5 In particular, there's an ongoing discussion regarding what the relationship should be between PerlNet and the new P5 wiki. If you're interested in the background, or would like to make your own voice heard, I encourage you to do so at: http://perl.net.au/wiki/Official_Perl_5_wiki_discussion There's also sporadic conversations (and notification of discussion updates) on #PerlNet on irc.freenode.net. 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 scottp at dd.com.au Tue Jul 10 17:03:58 2007 From: scottp at dd.com.au (Scott Penrose) Date: Wed, 11 Jul 2007 10:03:58 +1000 Subject: [Melbourne-pm] Perl Mongers Meeting: Wed 11 July 2007 In-Reply-To: <3c2b63c00707091402o63b8fa0dw6453c22f576a0e76@mail.gmail.com> References: <3c2b63c00707091402o63b8fa0dw6453c22f576a0e76@mail.gmail.com> Message-ID: <150693A1-3D7E-4D3E-9893-78BB4BB3C082@dd.com.au> If we run out of talks and still have time I can talk about Google Web Toolkit integration with Perl/Catalyst - abridged version of the talk I did for OSDClub. Scott On 10/07/2007, at 7:02 AM, Alec Clews wrote: > G'day everyone, > > (with apologies for the short notice) > > You and all of your friends, family and other interested people are > invited to > our meeting > > Date: Wednesday 11th July 2007 > Time: 6:30pm > Location: Editure > (Usual place) > Level 8, 14 Blackwood Street, North Melbourne > > Talks: > > 1. Leif Eriksen: Topic TBA > > 2. Jacinda Richardson: Demonstration of the Regex Coach > > 3. Alec Clews: Enterprise Change Control with RT (abridged) > > There is also an ongoing discussion about the future of perl.net.au > (see http://perl.net.au/wiki/Official_Perl_5_wiki_discussion) which we > may continue at the meeting or the pub if anyone is interested. > > -- > Alec Clews Melbourne, Australia. > Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C > blog:http://alecthegeek.wordpress.com/ > _______________________________________________ > Melbourne-pm mailing list > Melbourne-pm at pm.org > http://mail.pm.org/mailman/listinfo/melbourne-pm -- * - * http://www.osdc.com.au - Open Source Developers Conference * - * Scott Penrose Anthropomorphic Personification Expert http://search.cpan.org/search?author=SCOTT scott at 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. Please do not send me Word or PowerPoint attachments. See http://www.gnu.org/philosophy/no-word-attachments.html Microsoft is not the answer. It's the question. And the answer is no. From alecclews at gmail.com Tue Jul 10 17:14:20 2007 From: alecclews at gmail.com (Alec Clews) Date: Wed, 11 Jul 2007 10:14:20 +1000 Subject: [Melbourne-pm] Perl Mongers Meeting: Wed 11 July 2007 In-Reply-To: <150693A1-3D7E-4D3E-9893-78BB4BB3C082@dd.com.au> References: <3c2b63c00707091402o63b8fa0dw6453c22f576a0e76@mail.gmail.com> <150693A1-3D7E-4D3E-9893-78BB4BB3C082@dd.com.au> Message-ID: <3c2b63c00707101714yc4e180bl854e077696c8b1e8@mail.gmail.com> That might have more value than the current state of my talk which is long on "Enterprise" and "Process" but short on practical examples and advice. Can we move mine to say Sept'ish and impose upon you Scott? On 11/07/07, Scott Penrose wrote: > If we run out of talks and still have time I can talk about Google > Web Toolkit integration with Perl/Catalyst - abridged version of the > talk I did for OSDClub. > > Scott > > On 10/07/2007, at 7:02 AM, Alec Clews wrote: > > > G'day everyone, > > > > (with apologies for the short notice) > > > > You and all of your friends, family and other interested people are > > invited to > > our meeting > > > > Date: Wednesday 11th July 2007 > > Time: 6:30pm > > Location: Editure > > (Usual place) > > Level 8, 14 Blackwood Street, North Melbourne > > > > Talks: > > > > 1. Leif Eriksen: Topic TBA > > > > 2. Jacinda Richardson: Demonstration of the Regex Coach > > > > 3. Alec Clews: Enterprise Change Control with RT (abridged) > > > > There is also an ongoing discussion about the future of perl.net.au > > (see http://perl.net.au/wiki/Official_Perl_5_wiki_discussion) which we > > may continue at the meeting or the pub if anyone is interested. > > > > -- > > Alec Clews Melbourne, Australia. > > Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C > > blog:http://alecthegeek.wordpress.com/ > > _______________________________________________ > > Melbourne-pm mailing list > > Melbourne-pm at pm.org > > http://mail.pm.org/mailman/listinfo/melbourne-pm > > -- > * - * http://www.osdc.com.au - Open Source Developers Conference * - * > Scott Penrose > Anthropomorphic Personification Expert > http://search.cpan.org/search?author=SCOTT > scott at 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. > > Please do not send me Word or PowerPoint attachments. > See http://www.gnu.org/philosophy/no-word-attachments.html > > Microsoft is not the answer. It's the question. And the answer is no. > > > -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From jarich at perltraining.com.au Tue Jul 10 18:44:51 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Wed, 11 Jul 2007 11:44:51 +1000 Subject: [Melbourne-pm] SECURECon 2007 - Call For Papers Message-ID: <46943613.8020503@perltraining.com.au> Perhaps some here would like to give a presentation. It's not a big conference, but it's lots of fun! In the past participation in the conference has been free. I imagine it will be so again this year, but I'm just passing this on from another mailing list. J ----------------------- SECURECon 2007 - Information Technology Security Conference November 7-9 2007 The University of Melbourne SECURECon aims to provide an affordable forum for high quality presentations, workshops and tutorials about information technology security for the University of Melbourne IT community and general public. The 5th SECURECon will feature one day of workshops and tutorials focused on hands on learning in a lab environment and two days of presentations. The SECURECon committee invites all interested parties to submit presentations on any topic in computer security for November 8-9. The theme for this year will be: Securing open environments Example technical presentations could cover topics such as Peer-to-peer security, VOIP, Wireless, Phishing and Internet social networking eg. www.myspace.com Other technical talks on hardening operating systems and network infrastructure are also welcome. For example of past presentations, please visit http://securecon.unimelb.edu.au/archive Presentations will be 50 minutes in length and all submissions (including slides to present) need to be emailed to: submit at securecon.unimelb.edu.au By 5:00pm Monday October 15 All enquiries and an optional bio can also be sent to the above email address. Please visit http://securecon.unimelb.edu.au for more information. Thanks for supporting SECURECon 2007! -- Cheers, Nick. ------------------------------------------------------- Nick Savvides SOC and Security Manager nsavvides at verisign.com.au Mobile: 0434 600 870 Phone: +61 3 9674 5543 Fax: +61 3 9682 4608 From scottp at dd.com.au Wed Jul 11 15:53:04 2007 From: scottp at dd.com.au (Scott Penrose) Date: Thu, 12 Jul 2007 08:53:04 +1000 Subject: [Melbourne-pm] Great news re: pm.org Wiki Message-ID: pm.org will now be putting up a wiki for any pm.org group that wants it - HORRAH ! Finally happening. It should be up and running really soon (uses the same system as the perl6, parrot and perl5 service). Scott -- * - * http://www.osdc.com.au - Open Source Developers Conference * - * Scott Penrose Open source developer http://linux.dd.com.au/ scottp at dd.com.au Dismaimer: Open sauce usually ends up never coming out (of the bottle). Please do not send me Word or PowerPoint attachments. See http://www.gnu.org/philosophy/no-word-attachments.html Microsoft is not the answer. It's the question. And the answer is no. From alecclews at gmail.com Wed Jul 11 23:32:47 2007 From: alecclews at gmail.com (Alec Clews) Date: Thu, 12 Jul 2007 16:32:47 +1000 Subject: [Melbourne-pm] Fwd: [MXPEG] Conference in Sydney on CI and Testing In-Reply-To: <5edfc9750707111929v6d7ab78u16b786df3c550503@mail.gmail.com> References: <5edfc9750707111929v6d7ab78u16b786df3c550503@mail.gmail.com> Message-ID: <3c2b63c00707112332q48434f59id42aca38810c40dd@mail.gmail.com> (Sorry about the HTML) I forgot to mention this at the meeting on Tuesday night..... Please cross post this to relevant interested groups.... They have 100 people so far, and can fit another 50... cheers, Erik http://www.citconf.com/sydney2007/index.php The Open Information Foundation, co-founded by Jeffrey Fredrick and Paul Julius, presents CITCON Asia/Pacific 2007 in Sydney, Australia. CITCON (Continuous Integration and Testing Conference) brings together people from every corner of the software development industry to discuss Continuous Integration and the type of Testing that goes along with it. - What: OpenSpace event discussing all aspects of CI and Testing, together - Where: Sydney Marriott Hotel, 36 College St., Sydney, Australia - When: July 27 & 28, 2007 - Who: Everyone interested in CI and Testing - Cost: Free Attendance is limited to 150 delegates on a first-come, first-served basis, so register now! If you are interested in finding out more about CITCON Asia/Pacific and future events please join the CITCON mailing list. [Non-text portions of this message have been removed] __._,_.___ Messages in this topic ( 1) Reply (via web post) | Start a new topic Messages| Files| Photos| Links| Database| Polls| Members| Calendar To read messages online visit: http://groups.yahoo.com/group/melbourne_XP_enthusiasts [image: Yahoo! Groups] Change settings via the Web(Yahoo! ID required) Change settings via email: Switch delivery to Daily Digest| Switch format to Traditional Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe Recent Activity - 4 New Members Visit Your Group SPONSORED LINKS - Extreme programming - Windows xp operating system - Agile development - Computer internet Yahoo! Finance It's Now Personal Guides, news, advice & more. New web site? Drive traffic now. Get your business on Yahoo! search. Yahoo! Groups Join a yoga group and take the stress out of your life. . __,_._,___ -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/melbourne-pm/attachments/20070712/1d959d04/attachment.html From pjf at perltraining.com.au Thu Jul 12 20:38:28 2007 From: pjf at perltraining.com.au (Paul Fenwick) Date: Fri, 13 Jul 2007 13:38:28 +1000 Subject: [Melbourne-pm] Dual-licensing of PerlNet content Message-ID: <4696F3B4.5000909@perltraining.com.au> G'day everyone, My apologies for all the PerlNet e-mails. This should be the last one you see from one for a while. As some of you may be aware, The Perl 5 Wiki launched a few days ago. I've been working with the P5wiki admins to try and find the best way to allow for material to be more freely exchanged between the wikis, and I have a favour to ask of anyone here who has contributed to PerlNet. Please consider dual-licensing your PerlNet contributions under the Perl 5 license (Artistic/GPL). This will open the door for them to appear on The Perl 5 Wiki, in the Perl documentation, and in other places where the Perl 5 license is used. Indicating that you agree to this dual-license is a *very* simple process. Just login to PerlNet, go to your user page, and add the following text: {{Perl5-license}} that will place a notice on your page indicating your consent to the Perl 5 license, and add you to a list of agreeing contributors. For more information regarding on dual-licensing, see: http://perl.net.au/wiki/Perl_5_wiki_HOWTO If you have any questions, please don't hesitate to contact me directly, or to join the discussions on irc.freenode.net #PerlNet All the very 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 Sun Jul 15 18:17:38 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Mon, 16 Jul 2007 11:17:38 +1000 Subject: [Melbourne-pm] Regex Coach address and meeting summary Message-ID: <469AC732.7060006@perltraining.com.au> For those who wanted the URL to the Regex Coach program I showed off during the last meeting it is: http://weitz.de/regex-coach/ For those who missed some or all of the meeting, Leif has provided a summary on our meeting history page at: http://perl.net.au/wiki/Melbourne_Perl_Mongers/Meeting_History_2007 I look forward to seeing you all at the OSDClub meeting we're hosting on the 8th August. If anyone has any (mostly) language-agnostic but otherwise really interesting topics they'd like to give a talk on, I'd love to hear from you. Jacinta -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +61 3 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact at perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | From jarich at perltraining.com.au Sun Jul 15 19:30:24 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Mon, 16 Jul 2007 12:30:24 +1000 Subject: [Melbourne-pm] Web provider for Catalyst applications Message-ID: <469AD840.9000003@perltraining.com.au> G'day everyone, A client of mine has some Perl and Catalyst applications she'd like to move to another hosting provider and has asked me for some advice. Although I can suggest some great US companies which offer Catalyst out of the box on virtual servers etc, I'm having some difficulty finding anyone in Australia who does so as well. At the moment having an Australian ISP is a requirement, with a preference for an east-coast main office. We are willing to consider a VPS package which provides root access, as I'm very happy to do the Perl and Catalyst installation if required. However I'm not planning on being her long-term system administrator, so I'd like a plan which includes general system maintenance including keeping Perl, Catalyst and the database software up to date. We'd be even happier for shared hosting so long as Perl 5.8.x and Catalyst were available. Price is obviously a concern, but I am happy to giver her quotes of anything up to $100/month, ($1200/year). I don't know that she'd pick something that high, but I'm determined to give her options. Can anyone recommend a business which is going to be able to fulfil these needs? All the best, Jacinta -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +61 3 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact at perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | From alecclews at gmail.com Mon Jul 16 14:02:56 2007 From: alecclews at gmail.com (Alec Clews) Date: Tue, 17 Jul 2007 07:02:56 +1000 Subject: [Melbourne-pm] Regex Coach address and meeting summary In-Reply-To: <469AC732.7060006@perltraining.com.au> References: <469AC732.7060006@perltraining.com.au> Message-ID: <1184619776.19656.1.camel@tardis.vic.optushome.com.au> There is some help on running Regex Coach under Linux Wine at http://appdb.winehq.org/appview.php?iVersionId=7513 Seems to work for me (I've also added a pointer on PerlNet) On Mon, 2007-07-16 at 11:17 +1000, Jacinta Richardson wrote: > For those who wanted the URL to the Regex Coach program I showed off during the > last meeting it is: http://weitz.de/regex-coach/ > > For those who missed some or all of the meeting, Leif has provided a summary on > our meeting history page at: > > http://perl.net.au/wiki/Melbourne_Perl_Mongers/Meeting_History_2007 > > I look forward to seeing you all at the OSDClub meeting we're hosting on the 8th > August. If anyone has any (mostly) language-agnostic but otherwise really > interesting topics they'd like to give a talk on, I'd love to hear from you. > > Jacinta > -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From adam.clarke at strategicdata.com.au Tue Jul 17 05:25:29 2007 From: adam.clarke at strategicdata.com.au (Adam Clarke) Date: Tue, 17 Jul 2007 22:25:29 +1000 Subject: [Melbourne-pm] Web provider for Catalyst applications In-Reply-To: <469AD840.9000003@perltraining.com.au> References: <469AD840.9000003@perltraining.com.au> Message-ID: <2D9A3130-91D2-4C93-B064-4B90E80E4D2E@strategicdata.com.au> On 16/07/2007, at 12:30 PM, Jacinta Richardson wrote: > ,A client of mine has some Perl and Catalyst applications she'd > like to move > to another hosting provider and has asked me for some advice. > Although I can > suggest some great US companies which offer Catalyst out of the box > on virtual > servers etc, I'm having some difficulty finding anyone in Australia > who does so > as well. At the moment having an Australian ISP is a requirement, > with a > preference for an east-coast main office. http://rimuhosting.com/ They are actually from NZ so if the above requirements are hard then they may be no good. That said they have some things in their favour o they have VPS servers in Brisbane (as well as Dallas, NY, and London), so they may meet the intent rather then the letter of the above requirements. o choice of Linux distros * Centos5 (RimuHosting Recommended Distro) * RimuHosting Enterprise Linux 4 (RHEL4-based) * Debian 4.0 (aka Etch) * Debian 3.1 (aka Sarge) * Ubuntu 6.06 (Dapper Drake with 5 yr long term support (LTS)) * Ubuntu 7.04 (Feisty Fawn, latest 6 monthly release) * Fedora 7 * Fedora Core 6 o I have heard them recommended quite a few times o only offer products where you get root (SSH) o offer discounts to OSS developers USD $40/month buys a pretty decent package in the US, bandwidth on the Aussie servers is more expensive than civilised places so they cost more. We are looking at a US based one for a client at the moment. Cheers -- Adam Clarke www.strategicdata.com.au From melbourne.pm at joshheumann.com Tue Jul 17 06:13:02 2007 From: melbourne.pm at joshheumann.com (Josh Heumann) Date: Tue, 17 Jul 2007 06:13:02 -0700 Subject: [Melbourne-pm] Web provider for Catalyst applications In-Reply-To: <2D9A3130-91D2-4C93-B064-4B90E80E4D2E@strategicdata.com.au> References: <469AD840.9000003@perltraining.com.au> <2D9A3130-91D2-4C93-B064-4B90E80E4D2E@strategicdata.com.au> Message-ID: <20070717131302.GA16529@joshheumann.com> > http://rimuhosting.com/ I guess that means I *can* recommend one after all. I've been using Rimu for several years now, and I'm liking it enough. The folks who man the IM help desk aren't terribly clever, but the package I've got with a friend (we're on the Denver server, I believe) gives us root as well as any distro we want. I've even installed both Catalyst and Jifty on it. Jacinta, I'd be happy to answer any other questions if they sound like they might be a good fit for your client. J From jarich at perltraining.com.au Thu Jul 19 20:07:12 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Fri, 20 Jul 2007 13:07:12 +1000 Subject: [Melbourne-pm] LCA CFP closes today Message-ID: <46A026E0.2050808@perltraining.com.au> As you probably know the next Linux.conf.au will be running in Melbourne in January. If you were planning on submitting a talk proposal, this is a reminder that the CFP closes in 11 hours (11:59pm Friday 20th July). http://linux.conf.au/presentations/announcement 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 alecclews at gmail.com Mon Jul 23 01:25:22 2007 From: alecclews at gmail.com (Alec Clews) Date: Mon, 23 Jul 2007 18:25:22 +1000 Subject: [Melbourne-pm] Fwd: [WSG Melbourne] Webby Women, We Need You! In-Reply-To: <75969234_96474431@mail.webboy.net> References: <75969234_96474431@mail.webboy.net> Message-ID: <3c2b63c00707230125w9c20d0dnbb4a2a66d906d448@mail.gmail.com> FYI: ---------- Forwarded message ---------- From: Matthew Magain Date: 23-Jul-2007 11:00 Subject: [WSG Melbourne] Webby Women, We Need You! To: melbourne-announce at webstandardsgroup.org ************************************************************** This is a one-way list for WSG Melbourne Announcements ************************************************************** Hi Melbourne WSG peeps Next Thursday, we're holding what we hope to the first in a series of short debates about issues affecting web professionals, and it should be a lot of fun. I've just published the details to the WSG site: http://webstandardsgroup.org/meetings/index.cfm?event_id=98 There's just one thing: we need a few more debaters to step forward. Ideally, it would be cool if we got some girls involved, so that the evening is not one big sausage-fest. Go take a look at the topics (no, they're not all technical!). If you think you have 3 minutes to say on any of them, write back to me ASAP! And if you know of anyone who you think would like to be involved, please forward this email to them. Hope to hear from you, Regards Matt ************************************************************** Guidelines: http://webstandardsgroup.org/mail/guidelines.cfm Unsubscribe: http://webstandardsgroup.org/join/unsubscribe.cfm Help: memberhelp at webstandardsgroup.org ************************************************************** -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From alecclews at gmail.com Wed Jul 25 21:48:24 2007 From: alecclews at gmail.com (Alec Clews) Date: Thu, 26 Jul 2007 14:48:24 +1000 Subject: [Melbourne-pm] Committee Meeting Message-ID: <3c2b63c00707252148n4a779ca5lf2e63501239042aa@mail.gmail.com> When does MPM hold committee meetings? -- Alec Clews Melbourne, Australia. Jabber: alecclews at jabber.org.au PGPKey ID: 0x9BBBFC7C blog:http://alecthegeek.wordpress.com/ From skud at infotrope.net Thu Jul 26 06:36:11 2007 From: skud at infotrope.net (Kirrily Robert) Date: Thu, 26 Jul 2007 23:36:11 +1000 Subject: [Melbourne-pm] Take the Perl Survey Message-ID: Not often we get the jump on the US during conference season, but they're only just waking up and dealing with their hangovers right now. Anyway, I just set this up: http://perlsurvey.org Here's the official promo blurb: ----- Take part in the 2007 Perl Survey! The Perl Survey is an attempt to capture a picture of the Perl community in all its diversity. No matter what sort of Perl programmer you are, we'd love to hear from you. The survey can be found at: http://perlsurvey.org It only takes about 5 minutes to complete. The survey will be open until September 30th, 2007. After that, we'll be reporting on the results and making the data freely available. Please feel free to forward this email to anyone other Perl programmers you know. Thanks for your help! Yours, Kirrily "Skud" Robert The Perl Survey info at perlsurvey.org -- Kirrily Robert skud at infotrope.net http://infotrope.net From lsharpe at pacificwireless.com.au Thu Jul 26 21:14:10 2007 From: lsharpe at pacificwireless.com.au (Leigh Sharpe) Date: Fri, 27 Jul 2007 14:14:10 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects Message-ID: Hi All, Can someone clear up a couple of things for me here? I have some code which does something like this: foreach(@an_array) { my $dbh=DBI->connect($dsn); # Do some other stuff here. last if (some_condition == true); $dbh->disconnect(); } Question is, if some_condition is true, the loop ends and $dbh goes out of scope. Does disconnect() get called on $dbh automatically? Or do I have a database connection still, even though I can't actually use it? This could cause grief for the database server if stale connections are still hanging around. On a related note, does disconnect() get called automatically when a program ends? Even if not explicitly called? Regards, Leigh Leigh Sharpe Network Systems Engineer Pacific Wireless Ph +61 3 9584 8966 Mob 0408 009 502 Helpdesk 1300 300 616 email lsharpe at pacificwireless.com.au web www.pacificwireless.com.au -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/melbourne-pm/attachments/20070727/f49ff97d/attachment.html From brendon.oliver at gmail.com Thu Jul 26 21:23:20 2007 From: brendon.oliver at gmail.com (Brendon Oliver) Date: Fri, 27 Jul 2007 14:23:20 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: References: Message-ID: <200707271423.20073.brendon.oliver@gmail.com> On Friday 27 July 2007 14:14:10 Leigh Sharpe wrote: > Hi All, > Can someone clear up a couple of things for me here? > I have some code which does something like this: > > foreach(@an_array) > { > > my $dbh=DBI->connect($dsn); > # Do some other stuff here. > last if (some_condition == true); > $dbh->disconnect(); > > } If you have a currently-executing statement handle (eg. looping though query results), you may get some complaints from that (something along the lines of telling you that you should call finish() first), but generally destruction of a database object will close the connection (at least, that seems to be the case with DBD::Pg handles). > Question is, if some_condition is true, the loop ends and $dbh goes out > of scope. Why not just disconnect before the condition? foreach(@an_array) { my $dbh=DBI->connect($dsn); # Do some other stuff here. $dbh->disconnect(); last if (some_condition == true); } seems to me to make more sense that way... cheers, - B> -- BOFH excuse #434: Please state the nature of the technical emergency 14:18:39 up 2 days, 3:04, 2 users, load average: 0.24, 0.19, 0.31 From thatha at gmail.com Thu Jul 26 21:26:52 2007 From: thatha at gmail.com (Gautam Gopalakrishnan) Date: Fri, 27 Jul 2007 14:26:52 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: References: Message-ID: Hi, > foreach(@an_array) > { > my $dbh=DBI->connect($dsn); > # Do some other stuff here. > last if (some_condition == true); > $dbh->disconnect(); > > } > > Question is, if some_condition is true, the loop ends and $dbh goes out of > scope. Does disconnect() get called on $dbh automatically? It does (as per the documentation) but safer way would be to put the disconnect inside a continue block. foreach (@array) { #connect, and do stuff } continue { $dbh->disconnect() (if defined $dbh) } Though opening and closing the db handle outside the loop is the better way to do things ... From lsharpe at pacificwireless.com.au Thu Jul 26 21:27:52 2007 From: lsharpe at pacificwireless.com.au (Leigh Sharpe) Date: Fri, 27 Jul 2007 14:27:52 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: <200707271423.20073.brendon.oliver@gmail.com> Message-ID: >If you have a currently-executing statement handle (eg. looping though query >results), you may get some complaints from that (something along the lines of >telling you that you should call finish() first), but generally destruction >of a database object will close the connection (at least, that seems to be >the case with DBD::Pg handles). I make sure all statement handles are finished at this point, so that's not a problem. (This is actually using DBD::mysql).. >foreach(@an_array) >{ > my $dbh=DBI->connect($dsn); > # Do some other stuff here. > $dbh->disconnect(); > last if (some_condition == true); >} > seems to me to make more sense that way... Except when you want to keep using the connection if the condition is false. Regards, Leigh Leigh Sharpe Network Systems Engineer Pacific Wireless Ph +61 3 9584 8966 Mob 0408 009 502 Helpdesk 1300 300 616 email lsharpe at pacificwireless.com.au web www.pacificwireless.com.au -----Original Message----- From: Brendon Oliver [mailto:brendon.oliver at gmail.com] Sent: Friday, 27 July 2007 2:23 PM To: melbourne-pm Subject: Re: [Melbourne-pm] DBI connect()'s, scope and disconnects On Friday 27 July 2007 14:14:10 Leigh Sharpe wrote: > Hi All, > Can someone clear up a couple of things for me here? > I have some code which does something like this: > > foreach(@an_array) > { > > my $dbh=DBI->connect($dsn); > # Do some other stuff here. > last if (some_condition == true); > $dbh->disconnect(); > > } If you have a currently-executing statement handle (eg. looping though query results), you may get some complaints from that (something along the lines of telling you that you should call finish() first), but generally destruction of a database object will close the connection (at least, that seems to be the case with DBD::Pg handles). > Question is, if some_condition is true, the loop ends and $dbh goes out > of scope. Why not just disconnect before the condition? foreach(@an_array) { my $dbh=DBI->connect($dsn); # Do some other stuff here. $dbh->disconnect(); last if (some_condition == true); } seems to me to make more sense that way... cheers, - B> -- BOFH excuse #434: Please state the nature of the technical emergency 14:18:39 up 2 days, 3:04, 2 users, load average: 0.24, 0.19, 0.31 _______________________________________________ Melbourne-pm mailing list Melbourne-pm at pm.org http://mail.pm.org/mailman/listinfo/melbourne-pm From brendon.oliver at gmail.com Thu Jul 26 21:32:15 2007 From: brendon.oliver at gmail.com (Brendon Oliver) Date: Fri, 27 Jul 2007 14:32:15 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: References: Message-ID: <200707271432.15753.brendon.oliver@gmail.com> On Friday 27 July 2007 14:27:52 Leigh Sharpe wrote: > >foreach(@an_array) > >{ > > my $dbh=DBI->connect($dsn); > > # Do some other stuff here. > > $dbh->disconnect(); > > last if (some_condition == true); > >} > > seems to me to make more sense that way... > > Except when you want to keep using the connection if the condition is > false. well.. you didn't say there was more stuff between the 'last if...' and the disconnect() in your example ;-) Also, unless the DBI->connect($dsn) in your loop has some magic which pools connections, I believe you will get a new connection on each iteration through the loop... Cheers, - B. -- All men know the utility of useful things; but they do not know the utility of futility. -- Chuang-tzu 14:29:46 up 2 days, 3:15, 2 users, load average: 0.09, 0.12, 0.19 From lsharpe at pacificwireless.com.au Thu Jul 26 21:50:09 2007 From: lsharpe at pacificwireless.com.au (Leigh Sharpe) Date: Fri, 27 Jul 2007 14:50:09 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: Message-ID: >foreach (@array) { > #connect, and do stuff >} >continue { > $dbh->disconnect() (if defined $dbh) >} Isn't $dbh already out of scope once the continue block is called? Regards, Leigh Leigh Sharpe Network Systems Engineer Pacific Wireless Ph +61 3 9584 8966 Mob 0408 009 502 Helpdesk 1300 300 616 email lsharpe at pacificwireless.com.au web www.pacificwireless.com.au -----Original Message----- From: Gautam Gopalakrishnan [mailto:thatha at gmail.com] Sent: Friday, 27 July 2007 2:27 PM To: melbourne-pm Subject: Re: [Melbourne-pm] DBI connect()'s, scope and disconnects Hi, > foreach(@an_array) > { > my $dbh=DBI->connect($dsn); > # Do some other stuff here. > last if (some_condition == true); > $dbh->disconnect(); > > } > > Question is, if some_condition is true, the loop ends and $dbh goes out of > scope. Does disconnect() get called on $dbh automatically? It does (as per the documentation) but safer way would be to put the disconnect inside a continue block. foreach (@array) { #connect, and do stuff } continue { $dbh->disconnect() (if defined $dbh) } Though opening and closing the db handle outside the loop is the better way to do things ... _______________________________________________ Melbourne-pm mailing list Melbourne-pm at pm.org http://mail.pm.org/mailman/listinfo/melbourne-pm From thatha at gmail.com Thu Jul 26 22:12:23 2007 From: thatha at gmail.com (Gautam Gopalakrishnan) Date: Fri, 27 Jul 2007 15:12:23 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: References: Message-ID: > >foreach (@array) { > > #connect, and do stuff > >} > >continue { > > $dbh->disconnect() (if defined $dbh) > >} > > Isn't $dbh already out of scope once the continue block is called? $ perl -le 'while(my $x = <>) {print "1.$x"} continue{print "2.$x"}' works like how I wanted it to. $ perl -le 'while(<>) {my $x=$_; print "1.$x"} continue{print "2.$x"}' does not and this is the case we're talking about. You can get around it by declaring $dbh just before the loop, but not sure if that's acceptable. From jarich at perltraining.com.au Sat Jul 28 00:09:00 2007 From: jarich at perltraining.com.au (Jacinta Richardson) Date: Sat, 28 Jul 2007 17:09:00 +1000 Subject: [Melbourne-pm] DBI connect()'s, scope and disconnects In-Reply-To: References: Message-ID: <46AAEB8C.5020203@perltraining.com.au> Leigh Sharpe wrote: > Question is, if some_condition is true, the loop ends and $dbh goes out > of scope. Does disconnect() get called on $dbh automatically? Or do I > have a database connection still, even though I can't actually use it? disconnect gets called automatically when the handle goes out of scope. This happens because the object is destroyed. > On a related note, does disconnect() get called automatically when a > program ends? Even if not explicitly called? Yes. The same as above, whenever the database handle goes out of scope (possibly at the end of your program) its DESTROY method is called and this calls disconnect for you if the handle is active. On another note though, are you connecting to the same database for each array item? If so, then your program will be faster if you connect first, do the foreach and then disconnect. All the best, Jacinta -- ("`-''-/").___..--''"`-._ | Jacinta Richardson | `6_ 6 ) `-. ( ).`-.__.`) | Perl Training Australia | (_Y_.)' ._ ) `._ `. ``-..-' | +61 3 9354 6001 | _..`--'_..-_/ /--'_.' ,' | contact at perltraining.com.au | (il),-'' (li),' ((!.-' | www.perltraining.com.au | From paul.rodger at n6.com.au Sat Jul 28 23:56:43 2007 From: paul.rodger at n6.com.au (Paul Rodger) Date: Sat, 28 Jul 2007 23:56:43 -0700 Subject: [Melbourne-pm] [job] mod_perl developer for learning management system Message-ID: <415AD65C134E3F4FA0B4D06C88D63F30BA7F37E2@EXVMBX015-3.exch015.msoutlookonline.net> # Hello Melbourne Perl Mongers. my $job_ad = ' We require perl programmers for work on a web-based Learning Management System (LMS) using mod_perl and Oracle. Required skills: * Perl programming experience in a web environment * Relational database and SQL skills * HTML/Javascript * Good communication skills Bonus skills: * Oracle * Apache and mod_perl * Unix (especially Linux) * Experience with Learning Management Systems * SCORM and AICC * CSS, XML and AJAX * Subversion or CVS * Prototyping * Client-side Java * Unicode and internationalisation About Nexus6 Software We are a small and friendly software development house specialising in building web applications (mostly Learning Management Systems). We are located literally ten metres from Brunswick Street in Fitzroy, Melbourne. We try to offer a flexible, casual and salesperson-free environment. Please send all resumes or questions to jobs at n6.com.au '; if ($self->job_match($job_ad)) { use Mail::Sender; my $sender = Mail::Sender->new({smtp => 'localhost', from => $my_email_addr, subject => "my resume", to => 'jobs at n6.com.au'}); $sender->MailFile({msg => "my resume", file => "resume.pdf"}); } -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/melbourne-pm/attachments/20070728/1d00f2d3/attachment.html