From arocker at vex.net Sun Feb 1 08:10:14 2009 From: arocker at vex.net (arocker at vex.net) Date: Sun, 1 Feb 2009 11:10:14 -0500 (EST) Subject: [tpm] Has anybody heard of these people? Message-ID: http://www.uwinpro.com/ (The usual apologies to anyone in more than one set of addressees.) From samogon at gmail.com Wed Feb 4 15:38:51 2009 From: samogon at gmail.com (Ilia) Date: Wed, 4 Feb 2009 18:38:51 -0500 Subject: [tpm] Log::Log4perl with multiple files Message-ID: Currently I use Log::Log4perl to log all debug/warn/info/error messages to a single file. I'd like to use l4p to log to separate files. The filename should be determined based on the category I pass to Log::Log4perl->get_logger. >From the docs it seems I would have to manually setup l4p categories in the configuration file. ie.: log4perl.category.Bar.Twix = DEBUG, TwixLogfile log4perl.appender.TwixLogfile = Log::Log4perl::Appender::File log4perl.appender.TwixLogfile.filename = twix.log log4perl.category.Bar.Mars = WARN, MarsLogfile log4perl.appender.MarsLogfile = Log::Log4perl::Appender::File log4perl.appender.MarsLogfile.filename = mars.log But I don't want to setup a hundred different categories. So what I'm looking for is a custom Appender that enables syntax such as: log4perl.rootLogger=DEBUG, LOGFILE log4perl.appender.LOGFILE=Log::Log4perl::Appender::AutoFile log4perl.appender.LOGFILE.container=logs Log::Log4perl::Appender::AutoFile would automatically write to a log file in the "logs" directory. eg. Log::Log4perl->get_logger('Bar::Twix') would log to logs/bar.twix.log Does someone have experience with Log::Log4perl in this capacity? Is there another module I should look into? I found a similar request on the log4perl-devel mailing list but it goes back to 2007 http://www.mail-archive.com/log4perl-devel at lists.sourceforge.net/msg00084.html ilia. From samogon at gmail.com Thu Feb 5 07:29:04 2009 From: samogon at gmail.com (Ilia) Date: Thu, 5 Feb 2009 10:29:04 -0500 Subject: [tpm] currency deformatter Message-ID: I can't believe there doesn't seem to be a CPAN module to parse a currency into a decimal. The function I'm looking for should return a decimal based on various input like: $65,345.89 $65.345,89 $24,969.00(txincl.) $24,969.00* any extraneous data like "(txincl.)" should be removed. any spaces should be removed. Any takers? ilia. From samogon at gmail.com Thu Feb 5 10:18:34 2009 From: samogon at gmail.com (Ilia) Date: Thu, 5 Feb 2009 13:18:34 -0500 Subject: [tpm] currency deformatter In-Reply-To: References: <4A3EA4F3E4AF49529C356833E3BB80E9@ROADKILL> Message-ID: Very nice Indy! Still don't think this deserves to be a module on CPAN? ilia. On Thu, Feb 5, 2009 at 12:19 PM, Indy Singh wrote: > I missed that one. Here is a more comprehensive solution that deals with > your test cases. It guesses the format based on the string, however there > are cases that are ambiguous. For a full solution you would need to feed in > information as to the decimal separator based on locale. > > Here are the cases that could be a problem: > $123.456 can be considered as 123.456 or 123456.00 > $123,456 can be considered as 123.456 or 123456.00 > > If I missed anything, I leave it as an exercise to the reader. > > currency('$65,345.89'); # case 1 > currency('$65.345,89'); # case 2 > currency('$24,969.00(txincl.)'); # case 3 > currency('$24,969.00*'); # case 4 > > currency('$123,456,789'); # case 5 whole number > currency('$123.456.789'); # case 6 whole number > > currency('$123,456'); # case 7 > currency('$123.456'); # case 8 > > > sub currency > { > my ($x) = @_; > my ($c) = $x =~ /([0-9\.,]+)/; # this gets any sequence of digits, > periods, and commas > > my @p = $c =~ /([,\.])/g; # get a list of puncuation characters > (, or .) > > > if (@p == 1 && @p[0] eq '.') { > # string has just one period, assume it is a decimal seperator > } > elsif (@p == 1 && @p[0] eq ',') { > # string has just one comma, assume it is a decimal seperator, replace > with period > $c =~ s/,/./; > } > elsif (@p > 1 && @p[@p-1] ne @p[0] && @p[@p-1] eq '.') { > # case 1, 3, 4 > $c =~ s/,//g; > } > elsif (@p > 1 && @p[@p-1] ne @p[0] && @p[@p-1] eq ',') { > # case 2 > $c =~ s/\.//g; > $c =~ s/,/./; > } > else { > # no puncutation or multiple punctuation characters all the same > # case 5 or 6 > $c =~ s/\.//g; > $c =~ s/,//g; > } > print "$x -> $c\n"; > } > > > > > > > Indy Singh > IndigoSTAR Software -- www.indigostar.com > > > ----- Original Message ----- From: "Ilia" > To: "Indy Singh" ; > Sent: Thursday, February 05, 2009 11:28 AM > Subject: Re: [tpm] currency deformatter > > >> 1..4 >> ok 1 - fixup $65,345.89 >> not ok 2 - fixup $65.345,89 >> # Failed test 'fixup $65.345,89' >> # at agency_fix_contract_value.t line 18. >> # got: '65.34589' >> # expected: '65345.89' >> ok 3 - fixup $65,345.89(txincl.) >> ok 4 - fixup $65,345.89* >> # Looks like you failed 1 test of 4. >> >> >> On Thu, Feb 5, 2009 at 11:07 AM, Indy Singh wrote: >>> >>> The code below will do what you want for your test cases. I'm not sure >>> that >>> two lines of code justifies a whole module. >>> >>> $x = '$24,969.00(txincl.)'; >>> ($c) = $x =~ /([0-9\.,]+)/; >>> $c =~ s/,//g; >>> print "$x -> $c\n"; >>> >>> Indy Singh >>> IndigoSTAR Software -- www.indigostar.com >>> >>> >>> ----- Original Message ----- From: "Ilia" >>> To: >>> Sent: Thursday, February 05, 2009 10:29 AM >>> Subject: [tpm] currency deformatter >>> >>> >>>> I can't believe there doesn't seem to be a CPAN module to parse a >>>> currency into a decimal. >>>> >>>> The function I'm looking for should return a decimal based on various >>>> input like: >>>> $65,345.89 >>>> $65.345,89 >>>> $24,969.00(txincl.) >>>> $24,969.00* >>>> >>>> any extraneous data like "(txincl.)" should be removed. any spaces >>>> should be removed. >>>> >>>> Any takers? >>>> >>>> ilia. >>>> _______________________________________________ >>>> toronto-pm mailing list >>>> toronto-pm at pm.org >>>> http://mail.pm.org/mailman/listinfo/toronto-pm >>> >>> >> >> >> >> -- >> Ilia Lobsanov >> Nurey Networks - http://www.nurey.com >> New Ideas for a New Economy >> Python, Perl, Java, Linux & more >> Toronto +1 647 996 9087 >> Boston +1 781 328 1162 > > -- Ilia Lobsanov Nurey Networks - http://www.nurey.com New Ideas for a New Economy Python, Perl, Java, Linux & more Toronto +1 647 996 9087 Boston +1 781 328 1162 From quantum.mechanic.1964 at gmail.com Thu Feb 5 08:55:42 2009 From: quantum.mechanic.1964 at gmail.com (Quantum Mechanic) Date: Thu, 5 Feb 2009 11:55:42 -0500 Subject: [tpm] currency deformatter In-Reply-To: References: Message-ID: <77f3972e0902050855k79f71d0cnad5efac49972e5f0@mail.gmail.com> [Reply to all] $x = '$65,345.89zzzzzz'; if ($x =~ /\$([\d,.+-]+)/) { $y = $1 } (Obviously you can be more sophisticated with the match.) There's probably a FAQ for this, but I'm lazy today. On Thu, Feb 5, 2009 at 10:29 AM, Ilia wrote: > I can't believe there doesn't seem to be a CPAN module to parse a > currency into a decimal. > > The function I'm looking for should return a decimal based on various > input like: > $65,345.89 > $65.345,89 > $24,969.00(txincl.) > $24,969.00* > > any extraneous data like "(txincl.)" should be removed. any spaces > should be removed. > > Any takers? > > ilia. > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > -- -QM Quantum Mechanics: The dreams stuff is made of -------------- next part -------------- An HTML attachment was scrubbed... URL: From indy at indigostar.com Thu Feb 5 09:19:25 2009 From: indy at indigostar.com (Indy Singh) Date: Thu, 5 Feb 2009 12:19:25 -0500 Subject: [tpm] currency deformatter References: <4A3EA4F3E4AF49529C356833E3BB80E9@ROADKILL> Message-ID: I missed that one. Here is a more comprehensive solution that deals with your test cases. It guesses the format based on the string, however there are cases that are ambiguous. For a full solution you would need to feed in information as to the decimal separator based on locale. Here are the cases that could be a problem: $123.456 can be considered as 123.456 or 123456.00 $123,456 can be considered as 123.456 or 123456.00 If I missed anything, I leave it as an exercise to the reader. currency('$65,345.89'); # case 1 currency('$65.345,89'); # case 2 currency('$24,969.00(txincl.)'); # case 3 currency('$24,969.00*'); # case 4 currency('$123,456,789'); # case 5 whole number currency('$123.456.789'); # case 6 whole number currency('$123,456'); # case 7 currency('$123.456'); # case 8 sub currency { my ($x) = @_; my ($c) = $x =~ /([0-9\.,]+)/; # this gets any sequence of digits, periods, and commas my @p = $c =~ /([,\.])/g; # get a list of puncuation characters (, or .) if (@p == 1 && @p[0] eq '.') { # string has just one period, assume it is a decimal seperator } elsif (@p == 1 && @p[0] eq ',') { # string has just one comma, assume it is a decimal seperator, replace with period $c =~ s/,/./; } elsif (@p > 1 && @p[@p-1] ne @p[0] && @p[@p-1] eq '.') { # case 1, 3, 4 $c =~ s/,//g; } elsif (@p > 1 && @p[@p-1] ne @p[0] && @p[@p-1] eq ',') { # case 2 $c =~ s/\.//g; $c =~ s/,/./; } else { # no puncutation or multiple punctuation characters all the same # case 5 or 6 $c =~ s/\.//g; $c =~ s/,//g; } print "$x -> $c\n"; } Indy Singh IndigoSTAR Software -- www.indigostar.com ----- Original Message ----- From: "Ilia" To: "Indy Singh" ; Sent: Thursday, February 05, 2009 11:28 AM Subject: Re: [tpm] currency deformatter > 1..4 > ok 1 - fixup $65,345.89 > not ok 2 - fixup $65.345,89 > # Failed test 'fixup $65.345,89' > # at agency_fix_contract_value.t line 18. > # got: '65.34589' > # expected: '65345.89' > ok 3 - fixup $65,345.89(txincl.) > ok 4 - fixup $65,345.89* > # Looks like you failed 1 test of 4. > > > On Thu, Feb 5, 2009 at 11:07 AM, Indy Singh > wrote: >> The code below will do what you want for your test cases. I'm not >> sure that >> two lines of code justifies a whole module. >> >> $x = '$24,969.00(txincl.)'; >> ($c) = $x =~ /([0-9\.,]+)/; >> $c =~ s/,//g; >> print "$x -> $c\n"; >> >> Indy Singh >> IndigoSTAR Software -- www.indigostar.com >> >> >> ----- Original Message ----- From: "Ilia" >> To: >> Sent: Thursday, February 05, 2009 10:29 AM >> Subject: [tpm] currency deformatter >> >> >>> I can't believe there doesn't seem to be a CPAN module to parse a >>> currency into a decimal. >>> >>> The function I'm looking for should return a decimal based on >>> various >>> input like: >>> $65,345.89 >>> $65.345,89 >>> $24,969.00(txincl.) >>> $24,969.00* >>> >>> any extraneous data like "(txincl.)" should be removed. any spaces >>> should be removed. >>> >>> Any takers? >>> >>> ilia. >>> _______________________________________________ >>> toronto-pm mailing list >>> toronto-pm at pm.org >>> http://mail.pm.org/mailman/listinfo/toronto-pm >> >> > > > > -- > Ilia Lobsanov > Nurey Networks - http://www.nurey.com > New Ideas for a New Economy > Python, Perl, Java, Linux & more > Toronto +1 647 996 9087 > Boston +1 781 328 1162 From samogon at gmail.com Thu Feb 5 07:59:14 2009 From: samogon at gmail.com (Ilia) Date: Thu, 5 Feb 2009 10:59:14 -0500 Subject: [tpm] currency deformatter In-Reply-To: References: Message-ID: Here's a test to get started... use strict; use Test::More tests=>4; my @got_data = ( '$65,345.89', '$65.345,89', '$65,345.89(txincl.)', '$65,345.89*', ); my $expected = '65345.89'; foreach my $got ( @got_data ) { is(fixup_currency($got), $expected, "fixup $got"); } On Thu, Feb 5, 2009 at 10:29 AM, Ilia wrote: > I can't believe there doesn't seem to be a CPAN module to parse a > currency into a decimal. > > The function I'm looking for should return a decimal based on various > input like: > $65,345.89 > $65.345,89 > $24,969.00(txincl.) > $24,969.00* > > any extraneous data like "(txincl.)" should be removed. any spaces > should be removed. > > Any takers? > > ilia. > -- Ilia Lobsanov Nurey Networks - http://www.nurey.com New Ideas for a New Economy Python, Perl, Java, Linux & more Toronto +1 647 996 9087 Boston +1 781 328 1162 From arocker at vex.net Thu Feb 5 11:50:46 2009 From: arocker at vex.net (arocker at vex.net) Date: Thu, 5 Feb 2009 14:50:46 -0500 (EST) Subject: [tpm] March meeting Message-ID: I think we have February organised, but is there anything in the schedule for March and subsequent months? From samogon at gmail.com Thu Feb 5 08:28:04 2009 From: samogon at gmail.com (Ilia) Date: Thu, 5 Feb 2009 11:28:04 -0500 Subject: [tpm] currency deformatter In-Reply-To: <4A3EA4F3E4AF49529C356833E3BB80E9@ROADKILL> References: <4A3EA4F3E4AF49529C356833E3BB80E9@ROADKILL> Message-ID: 1..4 ok 1 - fixup $65,345.89 not ok 2 - fixup $65.345,89 # Failed test 'fixup $65.345,89' # at agency_fix_contract_value.t line 18. # got: '65.34589' # expected: '65345.89' ok 3 - fixup $65,345.89(txincl.) ok 4 - fixup $65,345.89* # Looks like you failed 1 test of 4. On Thu, Feb 5, 2009 at 11:07 AM, Indy Singh wrote: > The code below will do what you want for your test cases. I'm not sure that > two lines of code justifies a whole module. > > $x = '$24,969.00(txincl.)'; > ($c) = $x =~ /([0-9\.,]+)/; > $c =~ s/,//g; > print "$x -> $c\n"; > > Indy Singh > IndigoSTAR Software -- www.indigostar.com > > > ----- Original Message ----- From: "Ilia" > To: > Sent: Thursday, February 05, 2009 10:29 AM > Subject: [tpm] currency deformatter > > >> I can't believe there doesn't seem to be a CPAN module to parse a >> currency into a decimal. >> >> The function I'm looking for should return a decimal based on various >> input like: >> $65,345.89 >> $65.345,89 >> $24,969.00(txincl.) >> $24,969.00* >> >> any extraneous data like "(txincl.)" should be removed. any spaces >> should be removed. >> >> Any takers? >> >> ilia. >> _______________________________________________ >> toronto-pm mailing list >> toronto-pm at pm.org >> http://mail.pm.org/mailman/listinfo/toronto-pm > > -- Ilia Lobsanov Nurey Networks - http://www.nurey.com New Ideas for a New Economy Python, Perl, Java, Linux & more Toronto +1 647 996 9087 Boston +1 781 328 1162 From abram.hindle at softwareprocess.us Thu Feb 5 18:30:16 2009 From: abram.hindle at softwareprocess.us (Abram Hindle) Date: Thu, 05 Feb 2009 21:30:16 -0500 Subject: [tpm] March meeting In-Reply-To: (sfid-20090205_202105_753639_273B7B9C) References: (sfid-20090205_202105_753639_273B7B9C) Message-ID: <498BA0B8.3080301@softwareprocess.us> I have some content I can present, but it is mostly about my own projects: * Lispy Perl or Perlish Lisp - how to use SourceFilters to write perl modules in other languages. * Harbinger: Using perl as a middle man for musical events Alternatively if more people wanted to present I could take 1/2 hr and then someone else present. abram arocker at vex.net wrote: > I think we have February organised, but is there anything in the schedule > for March and subsequent months? > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 252 bytes Desc: OpenPGP digital signature URL: From indy at indigostar.com Thu Feb 5 08:08:16 2009 From: indy at indigostar.com (Indy Singh) Date: Thu, 5 Feb 2009 11:08:16 -0500 Subject: [tpm] currency deformatter References: Message-ID: The code below will do what you want for your test cases. I'm not sure that two lines of code justifies a whole module. $x = '$24,969.00(txincl.)'; ($c) = $x =~ /([0-9\.,]+)/; $c =~ s/,//g; print "$x -> $c\n"; Indy Singh IndigoSTAR Software -- www.indigostar.com ----- Original Message ----- From: "Ilia" To: Sent: Thursday, February 05, 2009 10:29 AM Subject: [tpm] currency deformatter >I can't believe there doesn't seem to be a CPAN module to parse a > currency into a decimal. > > The function I'm looking for should return a decimal based on various > input like: > $65,345.89 > $65.345,89 > $24,969.00(txincl.) > $24,969.00* > > any extraneous data like "(txincl.)" should be removed. any spaces > should be removed. > > Any takers? > > ilia. > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm From fulko.hew at gmail.com Fri Feb 6 05:25:41 2009 From: fulko.hew at gmail.com (Fulko Hew) Date: Fri, 6 Feb 2009 08:25:41 -0500 Subject: [tpm] March meeting In-Reply-To: <498BA0B8.3080301@softwareprocess.us> References: <498BA0B8.3080301@softwareprocess.us> Message-ID: <8204a4fe0902060525x4e7948b5ga7142a529c211230@mail.gmail.com> On Thu, Feb 5, 2009 at 9:30 PM, Abram Hindle < abram.hindle at softwareprocess.us> wrote: > > I have some content I can present, but it is mostly about my own projects: > * Lispy Perl or Perlish Lisp - how to use SourceFilters to write perl > modules in other languages. > * Harbinger: Using perl as a middle man for musical events > They both sound interesting. Sounds like stuff for March _and_ April. :-) -------------- next part -------------- An HTML attachment was scrubbed... URL: From arocker at vex.net Fri Feb 6 07:19:08 2009 From: arocker at vex.net (arocker at vex.net) Date: Fri, 6 Feb 2009 10:19:08 -0500 (EST) Subject: [tpm] March meeting In-Reply-To: <498BA0B8.3080301@softwareprocess.us> References: <498BA0B8.3080301@softwareprocess.us> Message-ID: <2aaec365cf19b92348f020a07e3f5a72.squirrel@webmail.vex.net> > > I have some content I can present, but it is mostly about my own projects: > Unless they're utterly obscure, personal projects are usually the most interesting. Both of yours sound worthwhile. From bobby.lopez at gmail.com Fri Feb 6 07:33:13 2009 From: bobby.lopez at gmail.com (J. Bobby Lopez) Date: Fri, 6 Feb 2009 10:33:13 -0500 Subject: [tpm] Just introducing myself Message-ID: Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, but used to live there). I work at VMware and I enjoy coding in Perl :) -- J. Bobby Lopez Web: http://jbldata.com/ Twitter: http://www.twitter.com/jbobbylopez -------------- next part -------------- An HTML attachment was scrubbed... URL: From fulko.hew at gmail.com Fri Feb 6 07:48:29 2009 From: fulko.hew at gmail.com (Fulko Hew) Date: Fri, 6 Feb 2009 10:48:29 -0500 Subject: [tpm] Just introducing myself In-Reply-To: References: Message-ID: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: > Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, > but used to live there). I work at VMware and I enjoy coding in Perl :) > Hi Bobby... I'm Fulko. I'm also in Burlington, and my car pool to TPM meetings has been rather empty for quite a few months/years now. I'm just down the road working at SITA (aka Northrop-Grumman (aka Westinghouse) on Walkers Line. and I enjoy Perl too. and we use VMware, and as a matter of fact... I'll be trying to integrate/build some management tools to control/affect VMware using Perl in the next few weeks. So you're a good guy to know! -------------- next part -------------- An HTML attachment was scrubbed... URL: From dave.s.doyle at gmail.com Fri Feb 6 07:50:13 2009 From: dave.s.doyle at gmail.com (Dave Doyle) Date: Fri, 6 Feb 2009 10:50:13 -0500 Subject: [tpm] Just introducing myself In-Reply-To: References: Message-ID: Welcome aboard! I believe another prominent TPM member is out in your neck of the woods. I've even attended a meeting or two when I lived in Keswick. Perl is pleasure or is it also work for you? (VMWare uses Perl? If so, for what?) Dave -- dave.s.doyle at gmail.com On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: > Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, > but used to live there). I work at VMware and I enjoy coding in Perl :) > > -- > J. Bobby Lopez > Web: http://jbldata.com/ > Twitter: http://www.twitter.com/jbobbylopez > > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From psema4 at gmail.com Fri Feb 6 08:07:07 2009 From: psema4 at gmail.com (Scott Elcomb) Date: Fri, 6 Feb 2009 11:07:07 -0500 Subject: [tpm] Just introducing myself In-Reply-To: References: Message-ID: <99a6c38f0902060807h6cf6fdcfkfa6ed6638fb453b0@mail.gmail.com> On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: > Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, > but used to live there). I work at VMware and I enjoy coding in Perl :) Hello there and well met! I'm Scott, live in Hamilton and for the most part work here and in Mississauga. I tend lurk on this list (and learned some really cool tricks by doing so!) and love both Perl and JavaScript. -- Scott Elcomb http://www.psema4.com/ From psema4 at gmail.com Fri Feb 6 08:14:37 2009 From: psema4 at gmail.com (Scott Elcomb) Date: Fri, 6 Feb 2009 11:14:37 -0500 Subject: [tpm] March meeting In-Reply-To: References: Message-ID: <99a6c38f0902060814v54558866j259e6c11e242d66a@mail.gmail.com> On Thu, Feb 5, 2009 at 2:50 PM, wrote: > > I think we have February organised, but is there anything in the schedule > for March and subsequent months? I'd still like to do something that combines Perl & TiddlyWiki - just haven't had a chance to collect all my links and notes together. Also I should be well positioned to give an update on CAF in a few months. I've been working with a pre-release version (v0.30) for the last few weeks, building some simple apps and such. Still got lots to learn of course... like the history of the project and how CAF came about. (Hint, hint, nudge, nudge... ;-) -- Scott Elcomb http://www.psema4.com/ From bobby.lopez at gmail.com Fri Feb 6 08:21:03 2009 From: bobby.lopez at gmail.com (J. Bobby Lopez) Date: Fri, 6 Feb 2009 11:21:03 -0500 Subject: [tpm] Just introducing myself In-Reply-To: References: Message-ID: Thanks for the warm welcome all :) I use Perl both at work and for my own personal projects. Perl is used quite a bit for many of the Service Console tools which are shipped with ESX or Server by the engineering team in San Francisco. I'm the Tools and Automation lead for the Product Support Engineering group, which makes tools for use by GSS (Global Support Services) - essentially tools to help our Technical Support Engineers. I'm the only one here in Burlington though, the rest of my Team are in SF. The Burlington office mostly employs Technical Support engineers, along with a handful of representatives in HR and other departments. On Fri, Feb 6, 2009 at 10:50 AM, Dave Doyle wrote: > Welcome aboard! > > I believe another prominent TPM member is out in your neck of the woods. > I've even attended a meeting or two when I lived in Keswick. > > Perl is pleasure or is it also work for you? (VMWare uses Perl? If so, for > what?) > > Dave > > -- > dave.s.doyle at gmail.com > > > On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: > >> Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, >> but used to live there). I work at VMware and I enjoy coding in Perl :) >> >> -- >> J. Bobby Lopez >> Web: http://jbldata.com/ >> Twitter: http://www.twitter.com/jbobbylopez >> >> >> _______________________________________________ >> toronto-pm mailing list >> toronto-pm at pm.org >> http://mail.pm.org/mailman/listinfo/toronto-pm >> >> > -- J. Bobby Lopez Web: http://jbldata.com/ Twitter: http://www.twitter.com/jbobbylopez -------------- next part -------------- An HTML attachment was scrubbed... URL: From talexb at gmail.com Fri Feb 6 10:03:44 2009 From: talexb at gmail.com (Alex Beamish) Date: Fri, 6 Feb 2009 13:03:44 -0500 Subject: [tpm] Just introducing myself In-Reply-To: References: Message-ID: Hi Bobby, Welcome to the group. Hope you can start coming out regularly to the TPM meetings -- last Thursday of every month, at Yonge/Bloor. Agenda usually decided on a Just In Time basis. And beware of tangents .. they happen a lot with this group. ;) We'll probably have to do a 'My Name Is ..' romp around the room to start February's meeting, but I think most of us have heard of and used VMWare. Cheers, Alex -- Alex Beamish Toronto, Ontario aka talexb From bobby.lopez at gmail.com Fri Feb 6 10:32:40 2009 From: bobby.lopez at gmail.com (J. Bobby Lopez) Date: Fri, 6 Feb 2009 13:32:40 -0500 Subject: [tpm] Searching the Mailing list Message-ID: I don't suppose there would be a way to search the mailing list to prevent my asking a question or discussing a topic which was previously addressed? -- J. Bobby Lopez Web: http://jbldata.com/ Twitter: http://www.twitter.com/jbobbylopez -------------- next part -------------- An HTML attachment was scrubbed... URL: From dave.s.doyle at gmail.com Fri Feb 6 10:53:55 2009 From: dave.s.doyle at gmail.com (Dave Doyle) Date: Fri, 6 Feb 2009 13:53:55 -0500 Subject: [tpm] Searching the Mailing list In-Reply-To: References: Message-ID: The archive I'm aware of is here: http://mail.pm.org/pipermail/toronto-pm/ .. though it's not searchable. I suspect you won't tick anyone off though. :) -- dave.s.doyle at gmail.com On Fri, Feb 6, 2009 at 1:32 PM, J. Bobby Lopez wrote: > I don't suppose there would be a way to search the mailing list to prevent > my asking a question or discussing a topic which was previously addressed? > > -- > J. Bobby Lopez > Web: http://jbldata.com/ > Twitter: http://www.twitter.com/jbobbylopez > > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From stuart at morungos.com Fri Feb 6 10:54:15 2009 From: stuart at morungos.com (Stuart Watt) Date: Fri, 06 Feb 2009 13:54:15 -0500 Subject: [tpm] Just introducing myself In-Reply-To: References: Message-ID: <498C8757.7050608@morungos.com> Hiya Bobby and all - I'm a recent arrival to TPM too, having found it by accident, so I'll introduce myself as well. Anyway, I'm Stuart, I work and live in Toronto, having moved from Scotland about a year ago, when I quit as academic faculty from a university there. I've been using Perl for about 10 years now, having been a Lisp hacker for the ten years before that. Perl gives me all the stuff that Lisp did, without having to write everything from the ground up. Mostly now I'm using Catalyst and KinoSearch to build search and browsing interfaces. Stuart -- stuart at morungos.com / stuart at meetomatic.com J. Bobby Lopez wrote: > Thanks for the warm welcome all :) > > I use Perl both at work and for my own personal projects. Perl is > used quite a bit for many of the Service Console tools which are > shipped with ESX or Server by the engineering team in San Francisco. > > I'm the Tools and Automation lead for the Product Support Engineering > group, which makes tools for use by GSS (Global Support Services) - > essentially tools to help our Technical Support Engineers. I'm the > only one here in Burlington though, the rest of my Team are in SF. > The Burlington office mostly employs Technical Support engineers, > along with a handful of representatives in HR and other departments. > > On Fri, Feb 6, 2009 at 10:50 AM, Dave Doyle > wrote: > > Welcome aboard! > > I believe another prominent TPM member is out in your neck of the > woods. I've even attended a meeting or two when I lived in Keswick. > > Perl is pleasure or is it also work for you? (VMWare uses Perl? > If so, for what?) > > Dave > > -- > dave.s.doyle at gmail.com > > > On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez > > wrote: > > Hello, my name is Bobby. I live in Burlington Ontario (not > quite Toronto, but used to live there). I work at VMware and > I enjoy coding in Perl :) > > -- > J. Bobby Lopez > Web: http://jbldata.com/ > Twitter: http://www.twitter.com/jbobbylopez > > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > > > > > > -- > J. Bobby Lopez > Web: http://jbldata.com/ > Twitter: http://www.twitter.com/jbobbylopez > > ------------------------------------------------------------------------ > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From bobby.lopez at gmail.com Fri Feb 6 10:35:17 2009 From: bobby.lopez at gmail.com (J. Bobby Lopez) Date: Fri, 6 Feb 2009 13:35:17 -0500 Subject: [tpm] Searching the Mailing list In-Reply-To: References: Message-ID: I guess I could resort to Google for now: "site: http://mail.pm.org/pipermail/toronto-pm/ [topic]" On Fri, Feb 6, 2009 at 1:32 PM, J. Bobby Lopez wrote: > I don't suppose there would be a way to search the mailing list to prevent > my asking a question or discussing a topic which was previously addressed? > > -- > J. Bobby Lopez > Web: http://jbldata.com/ > Twitter: http://www.twitter.com/jbobbylopez > > -- J. Bobby Lopez Web: http://jbldata.com/ Twitter: http://www.twitter.com/jbobbylopez -------------- next part -------------- An HTML attachment was scrubbed... URL: From linux at alteeve.com Fri Feb 6 20:59:01 2009 From: linux at alteeve.com (Madison Kelly) Date: Fri, 06 Feb 2009 23:59:01 -0500 Subject: [tpm] send sms to a rogers phone Message-ID: <498D1515.3010203@alteeve.com> Anyone here doing this (in perl)? Thanks! Madi From olaf at vilerichard.com Fri Feb 6 21:20:47 2009 From: olaf at vilerichard.com (Olaf Alders) Date: Sat, 7 Feb 2009 00:20:47 -0500 Subject: [tpm] send sms to a rogers phone In-Reply-To: <498D1515.3010203@alteeve.com> References: <498D1515.3010203@alteeve.com> Message-ID: I just use MIME::Lite to send an email to 6472223333 at pcs.rogers.com (or whatever the number is). That initiates a process that will get you the info via SMS, albeit in a roundabout manner. You get an SMS saying you have an SMS. Then you reply to that SMS to then receive your SMS. It's suboptimal to say the least. If anyone knows how to do this in a way that doesn't use @pcs.rogers.com, I'd be very interested to hear about it. Olaf On 6-Feb-09, at 11:59 PM, Madison Kelly wrote: > Anyone here doing this (in perl)? > > Thanks! > > Madi > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > -- Olaf Alders olaf at vilerichard.com http://www.vilerichard.com -- folk rock http://cdbaby.com/cd/vilerichard From abram.hindle at softwareprocess.us Sat Feb 7 07:23:44 2009 From: abram.hindle at softwareprocess.us (Abram Hindle) Date: Sat, 07 Feb 2009 10:23:44 -0500 Subject: [tpm] send sms to a rogers phone In-Reply-To: (sfid-20090207_002806_433147_D19BDB81) References: <498D1515.3010203@alteeve.com> (sfid-20090207_002806_433147_D19BDB81) Message-ID: <498DA780.7030705@softwareprocess.us> I used to use their web interface, the web interface didn't require any permission from the user. But it did have a captcha. But you can get around that: http://churchturing.org/captcha-dist/HOWTO abram Olaf Alders wrote: > I just use MIME::Lite to send an email to 6472223333 at pcs.rogers.com (or > whatever the number is). That initiates a process that will get you the > info via SMS, albeit in a roundabout manner. You get an SMS saying you > have an SMS. Then you reply to that SMS to then receive your SMS. It's > suboptimal to say the least. If anyone knows how to do this in a way > that doesn't use @pcs.rogers.com, I'd be very interested to hear about it. > > Olaf > > On 6-Feb-09, at 11:59 PM, Madison Kelly wrote: > >> Anyone here doing this (in perl)? >> >> Thanks! >> >> Madi >> _______________________________________________ >> toronto-pm mailing list >> toronto-pm at pm.org >> http://mail.pm.org/mailman/listinfo/toronto-pm >> > > -- > Olaf Alders > olaf at vilerichard.com > > http://www.vilerichard.com -- folk rock > http://cdbaby.com/cd/vilerichard > > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 252 bytes Desc: OpenPGP digital signature URL: From arocker at vex.net Mon Feb 9 13:45:10 2009 From: arocker at vex.net (arocker at vex.net) Date: Mon, 9 Feb 2009 16:45:10 -0500 (EST) Subject: [tpm] [Fwd: Technical questions] Message-ID: <67b218de9269a584ebe679f571f5ef59.squirrel@webmail.vex.net> I've been asked these questions, and I'm looking for some more qualified opinions: 1. What open source or low cost proprietary tools would you suggest for developing interaction (including updates) between a web front end and Oracle 10 (not sure which sub-version) ? Should they be moving to a more recent version of Oracle ? 2. In OO design, how do you model the common scenario where two sets of data with different fields are brought together, producing a third dataset whose fields comprise most of the source dataset fields, plus derived attributes ? Is the object the final output ? If so, how do you represent the input datasets and attributes ? From talexb at gmail.com Mon Feb 9 14:15:04 2009 From: talexb at gmail.com (Alex Beamish) Date: Mon, 9 Feb 2009 17:15:04 -0500 Subject: [tpm] [Fwd: Technical questions] In-Reply-To: <67b218de9269a584ebe679f571f5ef59.squirrel@webmail.vex.net> References: <67b218de9269a584ebe679f571f5ef59.squirrel@webmail.vex.net> Message-ID: On Mon, Feb 9, 2009 at 4:45 PM, wrote: > I've been asked these questions, and I'm looking for some more qualified > opinions: > > 1. What open source or low cost proprietary tools would you suggest for > developing interaction (including updates) between a web front end and > Oracle 10 (not sure which sub-version) ? Perl, with DBI? Is this a trick question? ;) > Should they be moving to a more > recent version of Oracle ? No idea. Wikipedia's page is here: http://en.wikipedia.org/wiki/Oracle_database > 2. In OO design, how do you model the common scenario where two sets of > data with different fields are brought together, producing a third dataset > whose fields comprise most of the source dataset fields, plus derived > attributes ? Isn't that polymorphism? Wikipedia link here: http://en.wikipedia.org/wiki/Polymorphism_in_object-oriented_programming#Perl > Is the object the final output ? It can be. > If so, how do you > represent the input datasets and attributes ? Attributes of A and B become attributes of the combined object AB, I suppose .. derived attributes would have whatever names they want, as long as they don't create confusion about where they came from. -- Alex Beamish Toronto, Ontario aka talexb From bobby.lopez at gmail.com Mon Feb 9 15:09:04 2009 From: bobby.lopez at gmail.com (J. Bobby Lopez) Date: Mon, 9 Feb 2009 18:09:04 -0500 Subject: [tpm] [Fwd: Technical questions] In-Reply-To: <67b218de9269a584ebe679f571f5ef59.squirrel@webmail.vex.net> References: <67b218de9269a584ebe679f571f5ef59.squirrel@webmail.vex.net> Message-ID: Well for your first question, my first instinct would be to use Perl with CPAN's DBD::Oracle. I use it to connect to Oracle 10.2 servers, and it works great. However you do need to install either Oracle Server, Oracle Express Edition (XE) or Oracle Instant Client for the required Oracle libraries. The Oracle installation part is quite an involved process if you haven't done it before. But once you've done it.. it's pretty straight forward. On Mon, Feb 9, 2009 at 4:45 PM, wrote: > I've been asked these questions, and I'm looking for some more qualified > opinions: > > 1. What open source or low cost proprietary tools would you suggest for > developing interaction (including updates) between a web front end and > Oracle 10 (not sure which sub-version) ? Should they be moving to a more > recent version of Oracle ? > > > 2. In OO design, how do you model the common scenario where two sets of > data with different fields are brought together, producing a third dataset > whose fields comprise most of the source dataset fields, plus derived > attributes ? Is the object the final output ? If so, how do you > represent the input datasets and attributes ? > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > -- J. Bobby Lopez Web: http://jbldata.com/ Twitter: http://www.twitter.com/jbobbylopez -------------- next part -------------- An HTML attachment was scrubbed... URL: From abuzarchaudhary at yahoo.com Wed Feb 11 22:06:36 2009 From: abuzarchaudhary at yahoo.com (Abuzar Chaudhary) Date: Wed, 11 Feb 2009 22:06:36 -0800 (PST) Subject: [tpm] March meeting In-Reply-To: Message-ID: <240357.55361.qm@web52902.mail.re2.yahoo.com> Well... since Parrot 1.0 will be out... would be nice if someone could give a parrot 101 talk... anyone? After 9 years of waiting (for an alpha release?), are we too jaded to call for a celebration? --- On Thu, 2/5/09, arocker at vex.net wrote: > From: arocker at vex.net > Subject: [tpm] March meeting > To: tpm at to.pm.org > Date: Thursday, February 5, 2009, 2:50 PM > I think we have February organised, but is there anything in > the schedule > for March and subsequent months? > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm From lebbatdot at cogeco.ca Thu Feb 12 10:53:41 2009 From: lebbatdot at cogeco.ca (lebbatdot at cogeco.ca) Date: Thu, 12 Feb 2009 12:53:41 -0600 Subject: [tpm] Just introducing myself In-Reply-To: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> References: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> Message-ID: <20090212185341.GF1133@lebbalot> Hi all I am more of a PERL wanabe, I live in Burlington as well and might be talked into a trip to TO. Cheers Brian * Fulko Hew (fulko.hew at gmail.com) wrote: > On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: > > > > Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, > > but used to live there). I work at VMware and I enjoy coding in Perl :) > > > > Hi Bobby... > > I'm Fulko. I'm also in Burlington, and my car pool to TPM meetings has been > rather empty for quite a few months/years now. I'm just down the road > working at > SITA (aka Northrop-Grumman (aka Westinghouse) on Walkers Line. > > and I enjoy Perl too. > > and we use VMware, and as a matter of fact... I'll be trying to > integrate/build some management tools > to control/affect VMware using Perl in the next few weeks. So you're a good > guy to know! > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm From abram.hindle at softwareprocess.us Thu Feb 12 12:48:54 2009 From: abram.hindle at softwareprocess.us (Abram Hindle) Date: Thu, 12 Feb 2009 15:48:54 -0500 Subject: [tpm] Just introducing myself In-Reply-To: <20090212185341.GF1133@lebbalot> (sfid-20090212_154212_212817_A26EED51) References: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> <20090212185341.GF1133@lebbalot> (sfid-20090212_154212_212817_A26EED51) Message-ID: <49948B36.9030203@softwareprocess.us> There's also a Kitchener Waterloo perl mongers: http://kw.pm.org abram lebbatdot at cogeco.ca wrote: > Hi all > > I am more of a PERL wanabe, I live in Burlington as well and might be > talked into a trip to TO. > > Cheers > Brian > > * Fulko Hew (fulko.hew at gmail.com) wrote: >> On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: >> >> >>> Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, >>> but used to live there). I work at VMware and I enjoy coding in Perl :) >>> >> Hi Bobby... >> >> I'm Fulko. I'm also in Burlington, and my car pool to TPM meetings has been >> rather empty for quite a few months/years now. I'm just down the road >> working at >> SITA (aka Northrop-Grumman (aka Westinghouse) on Walkers Line. >> >> and I enjoy Perl too. >> >> and we use VMware, and as a matter of fact... I'll be trying to >> integrate/build some management tools >> to control/affect VMware using Perl in the next few weeks. So you're a good >> guy to know! > >> _______________________________________________ >> toronto-pm mailing list >> toronto-pm at pm.org >> http://mail.pm.org/mailman/listinfo/toronto-pm > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 252 bytes Desc: OpenPGP digital signature URL: From lebbatdot at cogeco.ca Thu Feb 12 10:53:41 2009 From: lebbatdot at cogeco.ca (lebbatdot at cogeco.ca) Date: Thu, 12 Feb 2009 12:53:41 -0600 Subject: [tpm] Just introducing myself In-Reply-To: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> References: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> Message-ID: <20090212185341.GF1133@lebbalot> Hi all I am more of a PERL wanabe, I live in Burlington as well and might be talked into a trip to TO. Cheers Brian * Fulko Hew (fulko.hew at gmail.com) wrote: > On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: > > > > Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, > > but used to live there). I work at VMware and I enjoy coding in Perl :) > > > > Hi Bobby... > > I'm Fulko. I'm also in Burlington, and my car pool to TPM meetings has been > rather empty for quite a few months/years now. I'm just down the road > working at > SITA (aka Northrop-Grumman (aka Westinghouse) on Walkers Line. > > and I enjoy Perl too. > > and we use VMware, and as a matter of fact... I'll be trying to > integrate/build some management tools > to control/affect VMware using Perl in the next few weeks. So you're a good > guy to know! > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm From abram.hindle at softwareprocess.us Thu Feb 12 12:48:54 2009 From: abram.hindle at softwareprocess.us (Abram Hindle) Date: Thu, 12 Feb 2009 15:48:54 -0500 Subject: [tpm] Just introducing myself In-Reply-To: <20090212185341.GF1133@lebbalot> (sfid-20090212_154212_212817_A26EED51) References: <8204a4fe0902060748v6ec02fc1gbed53723a6657386@mail.gmail.com> <20090212185341.GF1133@lebbalot> (sfid-20090212_154212_212817_A26EED51) Message-ID: <49948B36.9030203@softwareprocess.us> There's also a Kitchener Waterloo perl mongers: http://kw.pm.org abram lebbatdot at cogeco.ca wrote: > Hi all > > I am more of a PERL wanabe, I live in Burlington as well and might be > talked into a trip to TO. > > Cheers > Brian > > * Fulko Hew (fulko.hew at gmail.com) wrote: >> On Fri, Feb 6, 2009 at 10:33 AM, J. Bobby Lopez wrote: >> >> >>> Hello, my name is Bobby. I live in Burlington Ontario (not quite Toronto, >>> but used to live there). I work at VMware and I enjoy coding in Perl :) >>> >> Hi Bobby... >> >> I'm Fulko. I'm also in Burlington, and my car pool to TPM meetings has been >> rather empty for quite a few months/years now. I'm just down the road >> working at >> SITA (aka Northrop-Grumman (aka Westinghouse) on Walkers Line. >> >> and I enjoy Perl too. >> >> and we use VMware, and as a matter of fact... I'll be trying to >> integrate/build some management tools >> to control/affect VMware using Perl in the next few weeks. So you're a good >> guy to know! > >> _______________________________________________ >> toronto-pm mailing list >> toronto-pm at pm.org >> http://mail.pm.org/mailman/listinfo/toronto-pm > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 252 bytes Desc: OpenPGP digital signature URL: From arocker at vex.net Tue Feb 17 07:11:27 2009 From: arocker at vex.net (arocker at vex.net) Date: Tue, 17 Feb 2009 10:11:27 -0500 (EST) Subject: [tpm] Mac OS update breaks Perl Message-ID: <2444cd6a9e1bb68b5f47c6ba5359a846.squirrel@webmail.vex.net> http://www.theregister.co.uk/2009/02/16/apple_update_perl_breakage/ A caution for the Mac users. From arocker at vex.net Tue Feb 17 06:56:11 2009 From: arocker at vex.net (arocker at vex.net) Date: Tue, 17 Feb 2009 09:56:11 -0500 (EST) Subject: [tpm] Mac OS update breaks Perl Message-ID: http://www.theregister.co.uk/2009/02/16/apple_update_perl_breakage/ A caution for the Mac users. From dave.s.doyle at gmail.com Tue Feb 17 07:35:54 2009 From: dave.s.doyle at gmail.com (Dave Doyle) Date: Tue, 17 Feb 2009 10:35:54 -0500 Subject: [tpm] Mac OS update breaks Perl In-Reply-To: References: Message-ID: Tatsuhiko Miyagawa has a fix for this on his blog: http://bulknews.typepad.com/blog/2009/02/mac-os-x-security-update-2009001-breaks-perl-cpan.html -- dave.s.doyle at gmail.com On Tue, Feb 17, 2009 at 9:56 AM, wrote: > http://www.theregister.co.uk/2009/02/16/apple_update_perl_breakage/ > > A caution for the Mac users. > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From fulko.hew at gmail.com Wed Feb 18 11:39:43 2009 From: fulko.hew at gmail.com (Fulko Hew) Date: Wed, 18 Feb 2009 14:39:43 -0500 Subject: [tpm] securing a CGI program from malicious user data Message-ID: <8204a4fe0902181139q7d3a93a0h65fd064abde1cf81@mail.gmail.com> Problem: I'm providing a mechanism so that a system can be configured to 'run' executables on remote machines based on configuration information submitted in a CGI text field. Obviously I don't want to allow the user to trash the system. I'm going to: 1/ restrict the system to allow it to only execute 'trusted' apps located in a 'known' directory. (can I make a chroot jail in Perl/CGI?) 2/ strip characters from the invocation string that could be used to hurt me: semicolon - because another malicious command could follow backtic - because that could run another program ( ) - because that could invoke a sub-shell to run ... | - because that could invoke ... & - because other stuff might follow > - because that could clobber an important file any \0xxx string that represents any of the above 'nasty' characters. Tainging only talks about the concept, not what to de-taint. - Are there any other things I should check for/prevent? - Is there any standard/common resource on the web that you know of that talks about this (that I haven't found yet)? TIA Fulko -------------- next part -------------- An HTML attachment was scrubbed... URL: From jbl at jbldata.com Wed Feb 18 13:42:22 2009 From: jbl at jbldata.com (J. Bobby Lopez) Date: Wed, 18 Feb 2009 16:42:22 -0500 Subject: [tpm] securing a CGI program from malicious user data In-Reply-To: <8204a4fe0902181139q7d3a93a0h65fd064abde1cf81@mail.gmail.com> References: <8204a4fe0902181139q7d3a93a0h65fd064abde1cf81@mail.gmail.com> Message-ID: There were a couple of times when I considered doing something like this for various reasons. A few things to consider (if you haven't already). - Use the 'system()' function with arguments, instead of a full command-line string using back-ticks. This will reduce or eliminate the need to strip special characters that could possibly be used to execute any sub-commands. - Have your script do an md5 on the command and compare it to a protected list somewhere, or to an array of md5 strings kept within your script. - Chroot the commands that you want to execute. This means chrooting "perl" itself, along with it's libraries. - Have perl execute as a non-root account (you wouldn't believe how much this is overlooked, and so simple to fix) - Why use a text field? Use a select/dropdown, so you know exactly what the user could possibly execute, and make sure you submit it via POST. Use SSL. - Be strict with Apache, do not "FollowSymLinks" unless it is necessary. Don't put data in the CGI directory. Don't make directories listable if there isn't an 'index.html' There are probably a lot of other things you can do, depending on how strict you want to be. If you have the time, I say go whole-hog on it for the experience, and share the details with us :) On Wed, Feb 18, 2009 at 2:39 PM, Fulko Hew wrote: > Problem: > > I'm providing a mechanism so that a system can be configured > to 'run' executables on remote machines based on configuration > information submitted in a CGI text field. > > Obviously I don't want to allow the user to trash the system. > > I'm going to: > > 1/ restrict the system to allow it to only execute 'trusted' apps > located in a 'known' directory. (can I make a chroot jail in Perl/CGI?) > > 2/ strip characters from the invocation string that could be used to hurt > me: > semicolon - because another malicious command could follow > backtic - because that could run another program > ( ) - because that could invoke a sub-shell to run ... > | - because that could invoke ... > & - because other stuff might follow > > - because that could clobber an important file > > any \0xxx string that represents any of the above 'nasty' characters. > > Tainging only talks about the concept, not what to de-taint. > > - Are there any other things I should check for/prevent? > - Is there any standard/common resource on the web that you > know of that talks about this (that I haven't found yet)? > > TIA > Fulko > > > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > > -- J. Bobby Lopez Web: http://jbldata.com/ Twitter: http://www.twitter.com/jbobbylopez -------------- next part -------------- An HTML attachment was scrubbed... URL: From arocker at vex.net Fri Feb 20 13:01:23 2009 From: arocker at vex.net (arocker at vex.net) Date: Fri, 20 Feb 2009 16:01:23 -0500 (EST) Subject: [tpm] From jobs.perl.org Message-ID: <61b3f94317669ba8d3d48bc6f7538966.squirrel@webmail.vex.net> "Perl/Mod_Perl Programmer, Synaptic Vision Inc. Canada, Ontario, Toronto (2009-02-16)" Anybody know anything about them? The salary range is curiously broad. From adam.prime at utoronto.ca Fri Feb 20 14:36:21 2009 From: adam.prime at utoronto.ca (Adam Prime) Date: Fri, 20 Feb 2009 17:36:21 -0500 Subject: [tpm] From jobs.perl.org In-Reply-To: <61b3f94317669ba8d3d48bc6f7538966.squirrel@webmail.vex.net> References: <61b3f94317669ba8d3d48bc6f7538966.squirrel@webmail.vex.net> Message-ID: <499F3065.9060705@utoronto.ca> arocker at vex.net wrote: > "Perl/Mod_Perl Programmer, Synaptic Vision Inc. Canada, Ontario, Toronto > (2009-02-16)" > > Anybody know anything about them? The salary range is curiously broad. > I don't know anything about them other than that they've posted ads on jobs.perl.org a number of times over the last couple of years. I think they mean 40K - 75K, not 40/hr to 75/hr, it also looks like they are migrating to ruby based on that posting. Adam From linux at alteeve.com Fri Feb 20 14:53:04 2009 From: linux at alteeve.com (Madison Kelly) Date: Fri, 20 Feb 2009 17:53:04 -0500 Subject: [tpm] From jobs.perl.org In-Reply-To: <61b3f94317669ba8d3d48bc6f7538966.squirrel@webmail.vex.net> References: <61b3f94317669ba8d3d48bc6f7538966.squirrel@webmail.vex.net> Message-ID: <499F3450.7010100@alteeve.com> arocker at vex.net wrote: > "Perl/Mod_Perl Programmer, Synaptic Vision Inc. Canada, Ontario, Toronto > (2009-02-16)" > > Anybody know anything about them? The salary range is curiously broad. I used to work for them. Decent people, decent work environment. There servers were BSD, at least a couple years ago. Most development was done on devel servers via remote terminal session. They were mostly windows workstations when I got there but were happy enough to let me install a copy of Linux on my machine and work from there. No idea what's changed in the last couple years though. Madi From vvp at cogeco.ca Mon Feb 23 07:48:26 2009 From: vvp at cogeco.ca (Viktor Pavlenko) Date: Mon, 23 Feb 2009 10:48:26 -0500 Subject: [tpm] TaskForest Message-ID: <18850.50506.644680.92283@hetman.ua> Hi all, I'm looking for a simple and flexible job scheduler and came across TaskForest. http://taskforest.sourceforge.net/ Has anyone tried it? Is it good? The docs look promising: http://www.taskforest.com/ Thanks for your opinion! -- Viktor From Shane.Boyce at gennum.com Mon Feb 23 12:19:50 2009 From: Shane.Boyce at gennum.com (Shane Boyce) Date: Mon, 23 Feb 2009 15:19:50 -0500 Subject: [tpm] TaskForest In-Reply-To: <18850.50506.644680.92283@hetman.ua> References: <18850.50506.644680.92283@hetman.ua> Message-ID: Hi Viktor, Let me know if anyone replies to you. I'm also interested as I have some web pages (Perl CGI scripts) that take longer to crunch their output than a web browser will wait for them (depending on amount of information a customer asks to crunch). So converting those tools into scheduled background jobs that can be planned with user status and subsequent results retrieval once done would be very useful indeed! Thanks, Shane -----Original Message----- From: Viktor Pavlenko [mailto:vvp at cogeco.ca] Sent: February 23, 2009 10:48 AM To: tpm at to.pm.org Subject: [tpm] TaskForest Hi all, I'm looking for a simple and flexible job scheduler and came across TaskForest. http://taskforest.sourceforge.net/ Has anyone tried it? Is it good? The docs look promising: http://www.taskforest.com/ Thanks for your opinion! -- Viktor This communication contains confidential information intended only for the addressee(s). If you have received this communication in error, please notify us immediately and delete this communication from your mail box. From vvp at cogeco.ca Mon Feb 23 13:24:59 2009 From: vvp at cogeco.ca (Viktor Pavlenko) Date: Mon, 23 Feb 2009 16:24:59 -0500 Subject: [tpm] TaskForest In-Reply-To: References: <18850.50506.644680.92283@hetman.ua> Message-ID: <18851.5163.696858.479449@hetman.ua> >>>>> "SB" == Shane Boyce writes: SB> Hi Viktor, SB> Let me know if anyone replies to you. I'm also interested as I SB> have some web pages (Perl CGI scripts) that take longer to SB> crunch their output than a web browser will wait for them SB> (depending on amount of information a customer asks to SB> crunch). So converting those tools into scheduled background SB> jobs that can be planned with user status and subsequent SB> results retrieval once done would be very useful indeed! Well, I couldn't even get it installed... I used CPAN module to install it under my home directory (I don't have root access on this machine, perl is a bit outdated too, 5.8.5) but it pulls in tons of other modules and some of them won't install. So I gave up I think. There is another free product (no perl though), http://www.sos-berlin.com/modules/cjaycontent/index.php?id=62&page=osource_scheduler_introduction_en.htm but the concepts (and configuration) are a bit too complicated. -- Viktor From dave.s.doyle at gmail.com Tue Feb 24 06:38:03 2009 From: dave.s.doyle at gmail.com (Dave Doyle) Date: Tue, 24 Feb 2009 09:38:03 -0500 Subject: [tpm] All set for this week? Message-ID: Are the speakers still lined up for this week? Is TPM's February a go? -- dave.s.doyle at gmail.com -------------- next part -------------- An HTML attachment was scrubbed... URL: From samogon at gmail.com Tue Feb 24 07:06:52 2009 From: samogon at gmail.com (Ilia) Date: Tue, 24 Feb 2009 10:06:52 -0500 Subject: [tpm] All set for this week? In-Reply-To: References: Message-ID: yep, though i still have only an outline on my slides... much to do till thursday. I have not come up with a good title yet, but it will cover TAP, JUnit, Hudson and maybe Rakudo Perl6 ilia. On Tue, Feb 24, 2009 at 9:38 AM, Dave Doyle wrote: > Are the speakers still lined up for this week?? Is TPM's? February a go? > > -- > dave.s.doyle at gmail.com > > _______________________________________________ > toronto-pm mailing list > toronto-pm at pm.org > http://mail.pm.org/mailman/listinfo/toronto-pm > > -- Ilia Lobsanov Nurey Networks - http://www.nurey.com New Ideas for a New Economy Python, Perl, Java, Linux & more Toronto +1 647 996 9087 Boston +1 781 328 1162 From arocker at vex.net Tue Feb 24 16:04:50 2009 From: arocker at vex.net (arocker at vex.net) Date: Tue, 24 Feb 2009 19:04:50 -0500 (EST) Subject: [tpm] All set for this week? In-Reply-To: References: Message-ID: > > On Tue, Feb 24, 2009 at 9:38 AM, Dave Doyle > wrote: >> Are the speakers still lined up for this week?? Is TPM's? February a >> go? We have a room (11 on the 8th floor), thanks to Scott. Now, if Ilia's ready.. From magog at the-wire.com Wed Feb 25 17:58:26 2009 From: magog at the-wire.com (Michael Graham) Date: Wed, 25 Feb 2009 20:58:26 -0500 Subject: [tpm] Next Meeting Thursday 26 Feb (Tomorrow) - Continuous Integration (CI) for Perl Projects. Message-ID: <20090225205826.4b000364@caliope> (These details are also on the TPM web site: http://to.pm.org/) The next meeting is this Thursday, 26 February (Tomorrow!). Ilia will talk about TAP, JUnit, Hudson and maybe Rakudo Perl6. Date: Thursday 26 Feb 2009 (Tomorrow) Time: 6:45pm Speaker: Ilia Lobsanov Topic: Continuous Integration (CI) for Perl Projects. Cost: Free! Where: 2 Bloor Street West (NW corner of Yonge/Bloor, skyscraper with the CIBC logo on top) Classroom 11 on the 8th floor Description: We will look at the Test Anything Protocol (TAP). We will convert TAP output to JUnit format. Once in JUnit we can use a number of JVM based CI servers, like Hudson. The end goal is to see Rakudo Perl6 test suite on the Hudson web UI. =================================================================== Note: The elevators in the building are "locked down" after 5:30pm to people without building access cards. Leading up to the meeting someone will come down to the main floor lobby every few minutes to ferry people upstairs. After 19:00, you can reach the access-card-carrying guy via a cell phone number that we'll leave with security in the front lobby. The room and floor numbers will be left with security too. -- Michael Graham From abram.hindle at softwareprocess.us Thu Feb 26 20:34:47 2009 From: abram.hindle at softwareprocess.us (Abram Hindle) Date: Thu, 26 Feb 2009 23:34:47 -0500 Subject: [tpm] Google Summer of Code coming up? Message-ID: <49A76D67.3080304@softwareprocess.us> 19:30 -!- abramh changed the topic of #twitter to: abramh's last update: 14 people at #toronto #perl mongers tonight 21:54 < dukeleto> @abramh Are there any students there who want to get paid by google to hack on perl this summer? #toronto #perl this is twitter btw -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 252 bytes Desc: OpenPGP digital signature URL: From arocker at vex.net Fri Feb 27 06:34:47 2009 From: arocker at vex.net (arocker at vex.net) Date: Fri, 27 Feb 2009 09:34:47 -0500 (EST) Subject: [tpm] Charles Petzold to talk at U of T about Turing Message-ID: <3a65768be93c9bd69980896c4cb3ccfd.squirrel@webmail.vex.net> Next Thursday at 19:00, as I mentioned at Toronto Perlmongers last night. See: http://www.events.utoronto.ca/index.php?action=singleView&eventid=3401 for details. If you're not familiar with Petzold, see http://www.charlespetzold.com/books.html Despite his prolonged service to the Dark Side, he looks to be worth hearing.