From jhannah at mutationgrid.com Tue Feb 1 11:21:55 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Tue, 1 Feb 2011 13:21:55 -0600 Subject: [Omaha.pm] xmltwig.com is down... again? still? Message-ID: <300FC4D0-466E-4F0D-8F2F-D84630C0581E@mutationgrid.com> eep!? Sean: Have you emailed the author lately? Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From pbaker at omnihotels.com Tue Feb 1 11:23:54 2011 From: pbaker at omnihotels.com (Sean Baker) Date: Tue, 1 Feb 2011 13:23:54 -0600 Subject: [Omaha.pm] xmltwig.com is down... again? still? In-Reply-To: <300FC4D0-466E-4F0D-8F2F-D84630C0581E@mutationgrid.com> References: <300FC4D0-466E-4F0D-8F2F-D84630C0581E@mutationgrid.com> Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1047016C1@l3exchange.omnihotels.net> > Sean: Have you emailed the author lately? Try www.mirod.org. From jhannah at mutationgrid.com Tue Feb 1 13:45:43 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Tue, 1 Feb 2011 15:45:43 -0600 Subject: [Omaha.pm] Lacuna Expanse status report (Perl based MMO) Message-ID: <43AE9A87-C485-41C2-B2E8-F5061BC6DB56@mutationgrid.com> http://blogs.perl.org/users/jt_smith/2011/01/lacuna-expanse-status-report.html http://www.lacunaexpanse.com/ :) Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Tue Feb 1 16:21:50 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Tue, 1 Feb 2011 18:21:50 -0600 Subject: [Omaha.pm] Next meeting: Tue Feb 8, 7pm Message-ID: <5DBC8691-9C4D-4E03-8918-254F02821666@mutationgrid.com> I updated the website: http://odlug.org/ Ben Heath presents Appcelerator Titanium Thanks Ben! Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Thu Feb 3 09:45:55 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Thu, 3 Feb 2011 11:45:55 -0600 Subject: [Omaha.pm] Online git training next Friday - 7 hours for $195 Message-ID: <22882048-3731-4CC7-9BFF-8321FCB1D414@mutationgrid.com> Oh, very cool: https://github.com/blog/784-online-training-next-friday Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Sat Feb 5 10:34:29 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Sat, 5 Feb 2011 12:34:29 -0600 Subject: [Omaha.pm] framework shell shock? References: Message-ID: I think I shell-shocked Ben when he wandered into the source code for one of my Catalyst apps. "Where is the actual Perl program that runs?" Frameworks can be pretty intimidating at a glance... :/ Don't know if he's seen anything other than CGI.pm before. Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 Begin forwarded message: > From: Jay Hannah > Date: February 5, 2011 12:29:55 PM CST > > Hi Ben, > > Nice talking to you briefly. You might enjoy the web stack I use if you give it a chance: > > http://www.catalystframework.org/ > http://www.dbix-class.org/ > http://template-toolkit.org/ > > IRC is a great resource for these and the Perl universe in general. irc.perl.org #catalyst #dbix-class #tt etc. There are also lots of mailing lists, forums, etc. You might also consider joining local user groups: > > http://omaha.pm.org > http://odlug.org > > All that said, if you decide to rewrite everything I've done so far, in whatever web stack, I wish you the best of luck. I'd love to see Doug's vision succeed and I have other full time commitments I have to fulfill right now. > > All the best, > > Jay Hannah > Software Architect > jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 > > > > > From jhannah at mutationgrid.com Mon Feb 7 12:52:59 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Mon, 7 Feb 2011 14:52:59 -0600 Subject: [Omaha.pm] DBIx::Class::Journal Message-ID: <4EAC7263-B968-4342-BC56-09F44FAFB528@mutationgrid.com> Oooo... sexy. Want a full audit trail tracking all the changes to all the rows in your database, who, when? http://search.cpan.org/perldoc?DBIx::Class::Journal For years I've rolled this feature myself, adding _ar (archive) or _hist (history) tables for every table in my database... and all the code and testing that goes along with all of that. Next time I'm setting this up I'm going to try letting CPAN do it for me. :) Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Mon Feb 7 13:44:58 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Mon, 7 Feb 2011 15:44:58 -0600 Subject: [Omaha.pm] DBIx::Class::Journal In-Reply-To: <396CEDAA86B38646ACE2FEAA22C3FBF1047C5DFD@l3exchange.omnihotels.net> References: <4EAC7263-B968-4342-BC56-09F44FAFB528@mutationgrid.com> <396CEDAA86B38646ACE2FEAA22C3FBF1047C5DD9@l3exchange.omnihotels.net> <83A2F6BF-CC94-42F4-942E-81DD68198EBA@mutationgrid.com> <396CEDAA86B38646ACE2FEAA22C3FBF1047C5DFD@l3exchange.omnihotels.net> Message-ID: On Feb 7, 2011, at 3:28 PM, Sean Baker wrote: > From CPAN: > > LIMITATIONS ^ > > * Only single-column integer primary key'd tables are supported for auditing. That's my standard anyway, so I'm cool with that. > * Rows changed as a result of CASCADE settings on your database will not be detected by the module and hence not journalled. Ya, that's to be expected, and not a problem for me. My RDBMSs are intentionally kept very dumb. :) > * Updates made via "update" in DBIx::Class::ResultSet are not yet supported. Really? Ooof. I'd have to patch that to adopt it. Less work to add that then to invent my own wheel again? > * No API for viewing or restoring changes yet. Ya, presumably there's a set of tables sitting in the database I can query. The same way I would when I roll my own. I'm not sure I'd want a complex API. -ponder- Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Tue Feb 8 13:17:16 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Tue, 8 Feb 2011 15:17:16 -0600 Subject: [Omaha.pm] Meeting tonight, 7pm Message-ID: http://odlug.org Ben Heath presents Appcelerator Titanium "I've been playing around with some mobile development and I'd like to present something on Appcelerator Titanium. It's an open source product that allows you do develop for Android and iOS in Javascript. Pretty wild huh? I was planning to show a little code from both platforms and then wrap it up with some Appcelerator Titanium demos." Tuesday February 8 2011, 7pm (2nd Tuesday of every month.) UNO's Peter Kiewit Institute (PKI) Room PKI 276 1110 South 67th Street [map] Omaha, NE USA Lost? Jay's mobile phone: 402-598-7782 --- Note our room has officially changed to 375, one floor above our normal room. I'm on site wrestling UNO red tape to verify access to the room today. I'll post a note on the old door. This may mean I can't bring food/drink tonight. Thanks, Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Tue Feb 8 13:49:28 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Tue, 8 Feb 2011 15:49:28 -0600 Subject: [Omaha.pm] Meeting tonight, 7pm In-Reply-To: References: Message-ID: On Feb 8, 2011, at 3:17 PM, Jay Hannah wrote: > Note our room has officially changed to 375, one floor above our normal room. beepbeep! Success!! My badge is working. See you in room 375. :) Thanks, Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Wed Feb 9 10:24:35 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Wed, 9 Feb 2011 12:24:35 -0600 Subject: [Omaha.pm] PRANG - "XML to Moose objects and back!" Message-ID: Huh. I wonder if this is a Good Thing? http://search.cpan.org/perldoc?PRANG Other than Omni Hotels, who else is doing mass XML processing w/ Perl in Omaha? What do you use? (Omni and I have been married to XML::Twig for years.) Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Wed Feb 9 12:46:18 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Wed, 9 Feb 2011 14:46:18 -0600 Subject: [Omaha.pm] DBIx::Class::Fixtures - dump, reload databases Message-ID: <7DD803C8-7413-481A-B397-AA7085EF6EBC@mutationgrid.com> Huh. Another Cool Thing To Try? http://search.cpan.org/perldoc?DBIx::Class::Fixtures "Dump fixtures from source database to filesystem then import to another database (with same schema) at any time. Use as a constant dataset for running tests against or for populating development databases when impractical to use production clones. Describe fixture set using relations and conditions based on your DBIx::Class schema." Good for "reload my TDD (test driven development) dataset"? IRC is a neato hive of Maybe Good Ideas. :) Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Thu Feb 10 10:08:59 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Thu, 10 Feb 2011 12:08:59 -0600 Subject: [Omaha.pm] find a -d 1 -type d -exec cp -R {} b/ \; Message-ID: <110BAF89-1B68-40F6-9A63-E09C8A354FCD@mutationgrid.com> GNU++ Total elapsed time: 17 minutes :) Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 17:51 < kiran-mac> any one- given a parentDirectory containing multiple folders and files, How could I copy the parentDirectory with only folders and the content inside of that folder and leave behind all the files? 17:52 < kiran-mac> up to now I have been copying only the parentDirectory. Since the files are huge I want to exclude them during copying to my folder 17:53 < jhannah> sounds like a 10 line Perl program to me 17:53 < jhannah> "recreate this directory tree, but none of the files" 17:53 < jhannah> ? 17:54 < kiran-mac> yes 17:55 < kiran-mac> non of the files in the parentDirectory but I want the files inside of the folders 17:55 < jhannah> inside of all of all of the folders recursively? 17:55 < kiran-mac> yes 17:56 < kiran-mac> currently the way I have it set up is 18:05 < jhannah> find a -d 1 -type d -exec cp -R {} b/ \; 18:05 < jhannah> substitute a for whatever your source directory is and b for whatever your target directory is The little Perl program I started writing then realized I didn't need.... $ cat copy_deep_except_topdir_files.pl my $source_dir = $ARGV[0]; my $target_dir = $ARGV[1]; die unless (-d $source_dir); die if (-d $target_dir); mkdir $target_dir or die; my @files = glob("$source_dir/*"); foreach my $file (@files) { if (-d $file) { my $cmd = "cp -R $source_dir/$ } From rob.townley at gmail.com Sat Feb 12 22:31:15 2011 From: rob.townley at gmail.com (Rob Townley) Date: Sun, 13 Feb 2011 00:31:15 -0600 Subject: [Omaha.pm] [olug] find a -d 1 -type d -exec cp -R {} b/ \; In-Reply-To: <110BAF89-1B68-40F6-9A63-E09C8A354FCD@mutationgrid.com> References: <110BAF89-1B68-40F6-9A63-E09C8A354FCD@mutationgrid.com> Message-ID: > 18:05 < jhannah> find a -d 1 -type d -exec cp -R {} b/ \; > 18:05 < jhannah> substitute a for whatever your source directory is and b for whatever your target directory is find is nice for that. Do the curly braces {} denote a parameter passed from find? From jhannah at mutationgrid.com Wed Feb 16 10:36:09 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Wed, 16 Feb 2011 12:36:09 -0600 Subject: [Omaha.pm] log4perl.cfg format? In-Reply-To: <4D4525D0-6C16-435D-A527-A2D1DA21BC4C@mutationgrid.com> References: <4D4525D0-6C16-435D-A527-A2D1DA21BC4C@mutationgrid.com> Message-ID: <086E3211-7A51-445A-90FD-372FDE3438A9@mutationgrid.com> On Feb 16, 2011, at 12:26 PM, Jay Hannah wrote: > Anyone want to save me 15 minutes of work by telling me what's in this line of Omni's log4perl.cfg files? > > The default is this: > > layout_pattern = %d %F{1} %L> %m %n > > Which is > > 2011/02/16 18:23:52 Feed.pm 493> > > and forward slashes are annoying. :) Ah, nevermind I found it... and settled on this layout_class = PatternLayout layout_pattern = %d{ISO8601} %F{1} line:%L PID:%P> %m %n which kicks out this 2011-02-16 18:34:19,303 j1.pl line:7 PID:6179> hi :) Thanks, Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Wed Feb 16 11:57:16 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Wed, 16 Feb 2011 13:57:16 -0600 Subject: [Omaha.pm] perl 5.12.3 on DreamHost VPS Message-ID: <590B7BC9-0DB5-4C66-90AC-CAD323D57FC1@mutationgrid.com> [ps35512]$ pwd /home/cm_satin/src/perl-5.12.3 [ps35512]$ time make test ... t/porting/manifest.............................................ok t/porting/podcheck.............................................ok t/porting/test_bootstrap.......................................ok All tests successful. u=4.82 s=1.11 cu=323.50 cs=21.48 scripts=1695 tests=349535 real 10m36.674s user 5m31.057s sys 0m23.181s :) Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From dan at linder.org Fri Feb 18 09:07:23 2011 From: dan at linder.org (Dan Linder) Date: Fri, 18 Feb 2011 11:07:23 -0600 Subject: [Omaha.pm] Unexpected internal vs shell command speed result... Message-ID: My code currently calls the UNIX "du" command to get the size of a directory structure: $size = `/usr/bin/du -sk $DATA_DIR | cut -f1`; Knowing that shells are CPU time expensive and generally not portable across platforms I am looking into replacing it with a pure perl implementation: find( sub { -f and ( $size += -s _ ) }, $DATA_DIR ); Wanting to be able to brag about the speed increase, I timed them with the Benchmark routines, and got a shock when I tested against my /tmp directory: Rate Internal Shell_du Internal 11.6/s -- -99% Shell_du 1538/s 13123% -- WOW! The shell to du was 13 TIMES faster than the internal find code. (FYI, the /tmp/ directory has 349MB across 6400 files.) As a test, I created a very small directory structure (12 files, 2 sub-directories, 120KB) and the results for 10,000 timings are opposite: Rate Shell_du Internal Shell_du 1664/s -- -68% Internal 5208/s 213% -- This time the internal code was faster... My test system is a CentOS 5.5 64-bit (2GB RAM, mostly free RAM used for caching), with Perl 5.8.8, and the /tmp filesystem is an EXT3. This bit of code isn't time critical and the actual data that will be processed is closer to the 120K test case, so I may continue and remove the shell/du line, but I'd like to know how this got so slow! Dan Just in case I made a blunder, here's the test code: #!/usr/bin/perl -w use strict; use Benchmark qw(:all); use File::Find; my $foo = 0; my $count = shift || 2000; my $DATA_DIR = shift || "/tmp"; sub shell_du { my $size = 0; $size = `/usr/bin/du -sk $DATA_DIR | cut -f1`; chomp $size; return $size; } sub internal_du { my $size = 0; find( sub { -f and ( $size += -s _ ) }, $DATA_DIR ); return $size; } cmpthese ($count, { 'Shell_du' => sub { $foo = shell_du(); }, 'Internal' => sub { $foo = internal_du(); }, }); -- ***************** ************* *********** ******* ***** *** ** "Quis custodiet ipsos custodes?" (Who can watch the watchmen?) -- from the Satires of Juvenal "I do not fear computers, I fear the lack of them." -- Isaac Asimov (Author) ** *** ***** ******* *********** ************* ***************** -------------- next part -------------- An HTML attachment was scrubbed... URL: From jhannah at mutationgrid.com Fri Feb 18 09:53:38 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Fri, 18 Feb 2011 11:53:38 -0600 Subject: [Omaha.pm] Unexpected internal vs shell command speed result... In-Reply-To: References: Message-ID: <88479864-455B-483B-801B-A86741A4F36A@mutationgrid.com> On Feb 18, 2011, at 11:07 AM, Dan Linder wrote: > Knowing that shells are CPU time expensive and generally not portable across platforms I am looking into replacing it with a pure perl implementation: > find( sub { -f and ( $size += -s _ ) }, $DATA_DIR ); I don't know if that's an ideal pure perl implementation or not. I'm a Linux-only bigot. :) I'd be extremely impressed if any pure perl implementation of this consistently benchmarked well across disparate platforms compared to utilities like "du". du and equivalents only have one job to do ever, so have been engineered, written, and compiled for that one task, specifically for the architecture they're installed on. In contrast, people expect Perl to do a billion things well. If your real-world data is only 120K then it probably doesn't matter which you use. ;) Thanks, Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From jhannah at mutationgrid.com Fri Feb 18 13:52:04 2011 From: jhannah at mutationgrid.com (Jay Hannah) Date: Fri, 18 Feb 2011 15:52:04 -0600 Subject: [Omaha.pm] Perl TDD Intro Message-ID: <61CC5559-5908-4524-A5A9-458D4E6765DE@mutationgrid.com> I gave a little 15m Intro to Test Driven Development with Perl presentation at UNO today. You can check it out here: svn checkout https://clabsvn.ist.unomaha.edu/anonsvn/user/jhannah/UNO/Perl_TDD_Intro I'll be giving a longer version at our next meeting: Tuesday March 8 2011, 7pm (2nd Tuesday of every month.) UNO's Peter Kiewit Institute (PKI) Room PKI 375 Cheers, Jay Hannah Software Architect jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 From Payne at MattPayne.org Tue Feb 22 04:19:29 2011 From: Payne at MattPayne.org (Matt Payne) Date: Tue, 22 Feb 2011 06:19:29 -0600 Subject: [Omaha.pm] wunderlist seems to be a nice example of a Appcelerator Titanium application Message-ID: Ben -- Thanks for the talk on Appcelerator Titanium! I was pleased to learn that the Wunderlist application[1] shares it's source code[2] on github. I've not tried to compile my own version, but am hopeful that this could be a nice example of a appcelerator Titanium program. Thanks! --Matt Payne [1] http://wunderli.st or http://www.6wunderkinder.com/wunderlist/ [2] https://github.com/6wunderkinder/wunderlist [3] http://www.appcelerator.com/showcase/applications-showcase/ [4] http://www.extmap.com/index.php?pid=5 is an app that caught my eye On Tue, Feb 8, 2011 at 3:17 PM, Jay Hannah wrote: > http://odlug.org > > ?Ben Heath presents Appcelerator Titanium > ?"I've been playing around with some mobile development and I'd like to present something on Appcelerator Titanium. It's an open source product that allows you do develop for Android and iOS in Javascript. Pretty wild huh? I was planning to show a little code from both platforms and then wrap it up with some Appcelerator Titanium demos." > > ?Tuesday February 8 2011, 7pm > ?(2nd Tuesday of every month.) > ?UNO's Peter Kiewit Institute (PKI) > ?Room PKI 276 > ?1110 South 67th Street [map] Omaha, NE USA > ?Lost? Jay's mobile phone: 402-598-7782 > > --- > > Note our room has officially changed to 375, one floor above our normal room. I'm on site wrestling UNO red tape to verify access to the room today. I'll post a note on the old door. This may mean I can't bring food/drink tonight. > > Thanks, > > Jay Hannah > Software Architect > jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782 > > > > > From dan at linder.org Tue Feb 22 08:12:36 2011 From: dan at linder.org (Dan Linder) Date: Tue, 22 Feb 2011 10:12:36 -0600 Subject: [Omaha.pm] Change in CGI.pm from 5.8 to 5.10...? Message-ID: The code I'm keeping updated has lots of lines like this: $cgi = CGI->new(); $report = $cgi->{report}; (To pull in the "report=" value from the URL: http://testrh6/bin/test.cgi?report=MyReportName) When I was testing it on a RedHat 6 system running Perl 5.10.1, the $report variable was coming up as undefined, but on the test systems running Perl 5.8, it was just fine. The fix is to use the param() method like this: $report = $cgi->param('report'); Looks like I have a lot of code to fix. (IMHO it was broken before, just Perl was being nice about it...) Question: Did I miss this change, or did someone at RH mis-apply a patch? (I am leaning toward a functional change to increase security and make the CGI object more OO-correct...) I read the Perl change logs from 5.8 through 5.10.1 but didn't see this noted. Dan Here's my test code: 1 #!/usr/bin/perl -w 2 use strict; 3 use CGI; 4 use Data::Dumper; 5 my $perl_version = $]; 6 my $cgi; 7 my $report; 8 9 print "Content-type: text/html\n\n"; 10 print "\n"; 11 print "CGI Test\n"; 12 print "\n"; 13 print "\n"; 14 print "Testing with version: $perl_version\n"; 15 print "
";
    16  # Create CGI object
    17  $cgi = CGI->new();
    18
    19  $report = $cgi->{report};
    20  print "Raw report variable:";
    21  print Dumper $report;
    22  print "\n";
    23
    24  $report = $cgi->param('report');
    25  print "Report variable with param:";
    26  print Dumper $report;
    27  print "\n";
    28  print "<\pre>";
    29  exit;

On CentOS 5.5, the page reports this:
Testing with version: 5.008008
Raw report variable:$VAR1 = [
          'MyReportName'
        ];

Report variable with param:$VAR1 = 'MyReportName';


On the RedHat 6 box, this is the output:
Testing with version: 5.010001
Raw report variable:$VAR1 = undef;

Report variable with param:$VAR1 = 'MyReportName';

-- 
***************** ************* *********** ******* ***** *** **
"Quis custodiet ipsos custodes?"
    (Who can watch the watchmen?)
    -- from the Satires of Juvenal
"I do not fear computers, I fear the lack of them."
    -- Isaac Asimov (Author)
** *** ***** ******* *********** ************* *****************
-------------- next part --------------
An HTML attachment was scrubbed...
URL: 

From jhannah at mutationgrid.com  Tue Feb 22 08:33:38 2011
From: jhannah at mutationgrid.com (Jay Hannah)
Date: Tue, 22 Feb 2011 10:33:38 -0600
Subject: [Omaha.pm] Change in CGI.pm from 5.8 to 5.10...?
In-Reply-To: 
References: 
Message-ID: 

On Feb 22, 2011, at 10:12 AM, Dan Linder wrote:
> The code I'm keeping updated has lots of lines like this:
>     $cgi = CGI->new();
>     $report = $cgi->{report};
> 
> (To pull in the "report=" value from the URL: http://testrh6/bin/test.cgi?report=MyReportName)
> 
> When I was testing it on a RedHat 6 system running Perl 5.10.1, the $report variable was coming up as undefined, but on the test systems running Perl 5.8, it was just fine.
> 
> The fix is to use the param() method like this:
>     $report = $cgi->param('report');
> 
> Looks like I have a lot of code to fix.  (IMHO it was broken before, just Perl was being nice about it...)

Ha! I just hit the EXACTLY EQUIVALENT issue in old PHP code yesterday!  Small world.   :)   

   (In PHP "register_globals" has been deprecated sometime between 2002 and now.)

These change(s) wouldn't be listed in the Perl change log, they'd be noted in CGI's Changes file:

   http://cpansearch.perl.org/src/MARKSTOS/CGI.pm-3.52/Changes

Which, strangely, doesn't list the date of each release (when was 2.50 released? maybe that was the change point for your behavior).

Anyway, yes, $object->{...} is always evil and you're right to move away from it.

$cgi->Vars() is available and is probably the closest to your old code without all the evil:

   http://search.cpan.org/~markstos/CGI.pm-3.52/lib/CGI.pm#FETCHING_THE_PARAMETER_LIST_AS_A_HASH:

RedHat deserves no fault nor credit for this change.   :)

Hope that helps,

Jay Hannah
Software Architect
jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782





From dan at linder.org  Tue Feb 22 08:46:54 2011
From: dan at linder.org (Dan Linder)
Date: Tue, 22 Feb 2011 10:46:54 -0600
Subject: [Omaha.pm] Change in CGI.pm from 5.8 to 5.10...?
In-Reply-To: 
References: 
	
Message-ID: 

On Tue, Feb 22, 2011 at 10:33, Jay Hannah  wrote:

>   (In PHP "register_globals" has been deprecated sometime between 2002 and
> now.)
>

I remember that - I always knew pulling in user-supplied variables
automatically was a bad thing from a security standpoint.  It's too easy to
just pull them in and use them without actually knowing that they came from
user (i.e. hacker) land.


> These change(s) wouldn't be listed in the Perl change log, they'd be noted
> in CGI's Changes file:
>
>   http://cpansearch.perl.org/src/MARKSTOS/CGI.pm-3.52/Changes
>
> Which, strangely, doesn't list the date of each release (when was 2.50
> released? maybe that was the change point for your behavior).
>

Doh!  Should have checked there too.


> RedHat deserves no fault nor credit for this change.   :)


None implied - there have been enough cooks in this kitchen that I'll place
the blame on me/us first.  And I think the param() method makes things a bit
easier to read and follow.

Thanks,
Dan

-- 
***************** ************* *********** ******* ***** *** **
"Quis custodiet ipsos custodes?"
    (Who can watch the watchmen?)
    -- from the Satires of Juvenal
"I do not fear computers, I fear the lack of them."
    -- Isaac Asimov (Author)
** *** ***** ******* *********** ************* *****************
-------------- next part --------------
An HTML attachment was scrubbed...
URL: 

From jhannah at mutationgrid.com  Tue Feb 22 13:07:18 2011
From: jhannah at mutationgrid.com (Jay Hannah)
Date: Tue, 22 Feb 2011 15:07:18 -0600
Subject: [Omaha.pm] perl5i - like a camel with a machine gun
Message-ID: <492C2601-9609-4002-9D55-CF39D675D380@mutationgrid.com>

LOL!

http://github.com/schwern/perl5i/raw/master/img/perl5i%20camel%20with%20a%20machine%20gun.jpg

Jay Hannah
Software Architect
jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782






From jhannah at mutationgrid.com  Tue Feb 22 13:32:48 2011
From: jhannah at mutationgrid.com (Jay Hannah)
Date: Tue, 22 Feb 2011 15:32:48 -0600
Subject: [Omaha.pm] Fwd: Part time Catalyst development
References: 
Message-ID: <402B2BFB-35E2-430C-B5B1-BDBDCD91C3B0@mutationgrid.com>

Wow. 80 people on this mailing list and I got 0 responses.

What's up with that? ... Are you:

- Employed using Perl, don't want more work?
- Employed primarily in non-Perl, don't want more work?
- Under-employed but not interested in Perl work?
- Concerned your Perl skills are not what I need?
- Avoiding working with me because I'm a dork? 
- Only interested in payment-per-hour work?
- More interested in work in other languages/platforms instead of Perl?
- A robot that's just archiving this mailing list?
- Deceased?
- ... other?

Feedback very welcome.  :)

Thanks,

Jay Hannah
Software Architect
jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782



Begin forwarded message:
> From: Jay Hannah 
> Date: January 5, 2011 12:59:41 PM CST
> To: Nebraska USA Perl Mongers of Omaha 
> Subject: Part time Catalyst development
> 
> Anyone local interested in part time Catalyst development? I doubt I can pay you by the hour to work on it, but I've got all the fundamentals built already and there's a budget and a goal. Unfortunately it looks like I've grown too busy to finish it all myself. If you're interested we may be able to work something out.
> 
> Thanks,
> 
> Jay Hannah
> Software Architect
> jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-778






From jhannah at mutationgrid.com  Tue Feb 22 13:46:23 2011
From: jhannah at mutationgrid.com (Jay Hannah)
Date: Tue, 22 Feb 2011 15:46:23 -0600
Subject: [Omaha.pm] Fwd: Part time Catalyst development
In-Reply-To: 
References: 
	<402B2BFB-35E2-430C-B5B1-BDBDCD91C3B0@mutationgrid.com>
	
Message-ID: <1C0CE536-B089-4AEA-85E3-08A6C866C982@mutationgrid.com>

On Feb 22, 2011, at 3:38 PM, --ANONYMIZED-- wrote:
> "Concerned your Perl skills are not what I need?"
> 
> Never worked with Catalyst.

Catalyst is no big deal to learn. It's just Perl and I'd be happy to train.  :)

Jay Hannah
Software Architect
jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782





From dan at linder.org  Wed Feb 23 07:15:41 2011
From: dan at linder.org (Dan Linder)
Date: Wed, 23 Feb 2011 09:15:41 -0600
Subject: [Omaha.pm] [odynug] Profanity in git commits per language
In-Reply-To: 
References: <6B101E6B-0B61-46C7-AF69-1966DB95D169@mutationgrid.com>
	
Message-ID: 

On Feb 22, 2011 3:56 PM, "Jay Hannah"  wrote:
>
http://andrewvos.com/2011/02/21/amount-of-profanity-in-git-commit-messages-per-programming-language/
>
> See? Nobody finds Perl frustrating. Ever. ;)

On Tue, Feb 22, 2011 at 22:40, Nick Wertzberger  wrote:
> Not a real language. You have to have words to be a real language ;)

What?? Isn't the common "$@#%!" a swear word?  (And also a full web server
in Perl I believe...)

Dan

-- 
***************** ************* *********** ******* ***** *** **
"Quis custodiet ipsos custodes?"
    (Who can watch the watchmen?)
    -- from the Satires of Juvenal
"I do not fear computers, I fear the lack of them."
    -- Isaac Asimov (Author)
** *** ***** ******* *********** ************* *****************
-------------- next part --------------
An HTML attachment was scrubbed...
URL: 

From britt.c.gray at gmail.com  Sat Feb 26 17:50:57 2011
From: britt.c.gray at gmail.com (Britt Gray)
Date: Sat, 26 Feb 2011 19:50:57 -0600
Subject: [Omaha.pm] Fwd: Part time Catalyst development
In-Reply-To: <402B2BFB-35E2-430C-B5B1-BDBDCD91C3B0@mutationgrid.com>
References: 
	<402B2BFB-35E2-430C-B5B1-BDBDCD91C3B0@mutationgrid.com>
Message-ID: 

Hey Jay,

I am new to this mailing list.
I just started a new job 3 weeks ago. So I am not able to help you out right
now.
I may be available to help in month or two if you still need some help.

Britt



On Tue, Feb 22, 2011 at 3:32 PM, Jay Hannah wrote:

> Wow. 80 people on this mailing list and I got 0 responses.
>
> What's up with that? ... Are you:
>
> - Employed using Perl, don't want more work?
> - Employed primarily in non-Perl, don't want more work?
> - Under-employed but not interested in Perl work?
> - Concerned your Perl skills are not what I need?
> - Avoiding working with me because I'm a dork?
> - Only interested in payment-per-hour work?
> - More interested in work in other languages/platforms instead of Perl?
> - A robot that's just archiving this mailing list?
> - Deceased?
> - ... other?
>
> Feedback very welcome.  :)
>
> Thanks,
>
> Jay Hannah
> Software Architect
> jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-7782
>
>
>
> Begin forwarded message:
> > From: Jay Hannah 
> > Date: January 5, 2011 12:59:41 PM CST
> > To: Nebraska USA Perl Mongers of Omaha 
> > Subject: Part time Catalyst development
> >
> > Anyone local interested in part time Catalyst development? I doubt I can
> pay you by the hour to work on it, but I've got all the fundamentals built
> already and there's a budget and a goal. Unfortunately it looks like I've
> grown too busy to finish it all myself. If you're interested we may be able
> to work something out.
> >
> > Thanks,
> >
> > Jay Hannah
> > Software Architect
> > jhannah at mutationgrid.com | http://mutationgrid.com | 1-402-598-778
>
>
>
>
>
> _______________________________________________
> Omaha-pm mailing list
> Omaha-pm at pm.org
> http://mail.pm.org/mailman/listinfo/omaha-pm
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: