From jay at jays.net Sun Feb 1 12:36:52 2009 From: jay at jays.net (Jay Hannah) Date: Sun, 1 Feb 2009 14:36:52 -0600 Subject: [Omaha.pm] uppercasing some things in complex nested structures In-Reply-To: <3e2be50901310640n58f83f0pd1f0d660bada34b5@mail.gmail.com> References: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBBFF@l3exchange.omnihotels.net> <498357CA.60702@travisbsd.org> <3e2be50901310640n58f83f0pd1f0d660bada34b5@mail.gmail.com> Message-ID: <54DB6D58-27CE-4051-B0EC-21FE8B62EB0F@jays.net> On Jan 31, 2009, at 8:40 AM, Dan Linder wrote: > On Fri, Jan 30, 2009 at 1:40 PM, Travis McArthur > wrote: > if (ref($qualifiers) eq "HASH") > ... > elsif (ref($qualifiers) eq "ARRAY") > > I just started working on some recursive code and was forced to use > the "UNIVERSAL::isa" subroutine to check if an object is a hash or > array. You couldn't use ref? (perldoc -f ref) > This looks cleaner, but is it available in the older Perl 5.8.0? > This looks a lot like the Perl 5.10 code I saw demo'ed and thought > "Wow, very nice!"... I think ref has been in Perl 5... forever. I'm guessing very old Perl 5's will run that code just fine. :) j From jhannah at omnihotels.com Tue Feb 3 12:27:14 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Tue, 3 Feb 2009 14:27:14 -0600 Subject: [Omaha.pm] longest xpath ever? Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC0F@l3exchange.omnihotels.net> Do I win the award? :) j $ cat j.pl use XML::Twig; my $twig=XML::Twig->new(); $twig->parsefile('j.xml'); my $root = $twig->root; my @x = $root->get_xpath('soap:Body/AvailabilityResponse/AvailResponseSegments/a:AvailResponseSegment/a:RoomStayList/hc:RoomStay/hc:RatePlans/hc:RatePlan/hc:AdditionalDetails/hc:AdditionalDetail[@detailType="GuaranteePolicy"]/hc:AdditionalDetailDescription/hc:Text'); print $x[0]->text . "\n"; $ perl j.pl Guarantee is mandatory to reserve room,AX,DC,DS,JC,MC,VI -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Wed Feb 4 04:26:09 2009 From: jay at jays.net (Jay Hannah) Date: Wed, 4 Feb 2009 06:26:09 -0600 Subject: [Omaha.pm] longest xpath ever? In-Reply-To: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC0F@l3exchange.omnihotels.net> References: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC0F@l3exchange.omnihotels.net> Message-ID: <2A8F9F1F-5DCC-439B-8FE2-A00A1E0F80D7@jays.net> On Feb 3, 2009, at 2:27 PM, Jay Hannah wrote: > Do I win the award? :) Hmm... My work emails (Microsoft Netmail to Exchange) are funky viewed from home (Apple OSX Mail.app). The mailing list archive handles them fine though: http://mail.pm.org/pipermail/omaha-pm/2009-February/002025.html Ponder, j From jhannah at omnihotels.com Wed Feb 4 04:48:32 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Wed, 04 Feb 2009 06:48:32 -0600 Subject: [Omaha.pm] Perl + Electronica/Dance/Jazz/Techno Message-ID: If you like electronica you could listen to the same free Internet stream the deps.cpantesters.org guy does: http://deps.cpantesters.org/?module=Text::FixedWidth;perl=latest scroll to the bottom Personally, I can?t code to this, but whatever works for you!! :) j -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Thu Feb 5 10:10:43 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 05 Feb 2009 12:10:43 -0600 Subject: [Omaha.pm] Tighter/cleaner way to do this? map { grep {} } ? Message-ID: <498B2BA3.30006@jays.net> This works. But does anyone have a better solution than my foreach / if / push? j $ cat j.pl my @a = qw( junk:gold_17:junk junk:junk:junk junk:gold_blah9:junk ); my @b; foreach (@a) { if (/(gold\w+)/) { push @b, $1; } } print join ", ", @b; print "\n"; $ perl j.pl gold_17, gold_blah9 From jay at jays.net Thu Feb 5 10:28:45 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 05 Feb 2009 12:28:45 -0600 Subject: [Omaha.pm] Tighter/cleaner way to do this? map { grep {} } ? In-Reply-To: <498B2BA3.30006@jays.net> References: <498B2BA3.30006@jays.net> Message-ID: <498B2FDD.3040302@jays.net> Ooo... cool. Old code: my @b; foreach (@a) { if (/(gold\w+)/) { push @b, $1; } } New code: my @b = map { /(gold\w+)/ } @a; map gets the matches only ($1), not the entire original string. :) j From jharr at ist.unomaha.edu Thu Feb 5 11:09:30 2009 From: jharr at ist.unomaha.edu (James Harr) Date: Thu, 5 Feb 2009 13:09:30 -0600 Subject: [Omaha.pm] Tighter/cleaner way to do this? map { grep {} } ? In-Reply-To: <498B2FDD.3040302@jays.net> References: <498B2BA3.30006@jays.net> <498B2FDD.3040302@jays.net> Message-ID: If you're dealing with large amounts of resultant data, it might be better not to copy and print, but rather just print in the loop. $first = 1; foreach(@a){ next unless /(gold\w+)/; print ", " unless $first; $first = 0 if $first; print $1; } If it's small amounts of data, you can make it even shorter: print join ", ", map { /(gold\w+)/ } @a; print "\n"; -- James Harr 402-554-3340 Assistant Research Systems Manager College of Information Science and Technology University of Nebraska at Omaha -----Original Message----- From: omaha-pm-bounces+jharr=ist.unomaha.edu at pm.org [mailto:omaha-pm-bounces+jharr=ist.unomaha.edu at pm.org] On Behalf Of Jay Hannah Sent: Thursday, February 05, 2009 12:29 To: Perl Mongers of Omaha, Nebraska USA Subject: Re: [Omaha.pm] Tighter/cleaner way to do this? map { grep {} } ? Ooo... cool. Old code: my @b; foreach (@a) { if (/(gold\w+)/) { push @b, $1; } } New code: my @b = map { /(gold\w+)/ } @a; map gets the matches only ($1), not the entire original string. :) j _______________________________________________ Omaha-pm mailing list Omaha-pm at pm.org http://mail.pm.org/mailman/listinfo/omaha-pm From jay at jays.net Thu Feb 5 12:33:04 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 05 Feb 2009 14:33:04 -0600 Subject: [Omaha.pm] Tighter/cleaner way to do this? map { grep {} } ? In-Reply-To: References: <498B2BA3.30006@jays.net> <498B2FDD.3040302@jays.net> Message-ID: <498B4D00.3030008@jays.net> James Harr wrote: > If you're dealing with large amounts of resultant data, it might be > better not to copy and print, but rather just print in the loop. > > $first = 1; > foreach(@a){ > next unless /(gold\w+)/; > print ", " unless $first; > $first = 0 if $first; > print $1; > } > Ya, in my real problem they're small lists and I'm not printing, just needing a stripped subset. :) Thanks, j From jhannah at omnihotels.com Tue Feb 10 09:25:27 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Tue, 10 Feb 2009 11:25:27 -0600 Subject: [Omaha.pm] Catalyst CONTRIBUTORS Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC31@l3exchange.omnihotels.net> woot! My Catalyst credit has been pushed to CPAN. :) http://search.cpan.org/~mramberg/Catalyst-Runtime-5.71000/lib/Catalyst.pm#CONTRIBUTORS j -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Tue Feb 10 17:37:29 2009 From: jay at jays.net (Jay Hannah) Date: Tue, 10 Feb 2009 19:37:29 -0600 Subject: [Omaha.pm] Fwd: [odynug] iPhone Development this Tuesday (tomorrow) night! References: Message-ID: <6D637261-6B19-4ECD-BAC7-BFC5002D7913@jays.net> (Secret: Our monthly meeting started 37 minutes ago.) http://jays.net/wiki/Omaha_Perl_Mongers#Meetings I couldn't make it tonight. j Begin forwarded message: > From: Matt Secoske > Date: February 9, 2009 8:55:57 PM CST > To: odynug at googlegroups.com > Subject: [odynug] iPhone Development this Tuesday (tomorrow) night! > Reply-To: odynug at googlegroups.com > > Hey Everyone, > > Tomorrow night brings us another Omaha Dynamic Language Users Group! > > How To Write iPhone Applications - Brent Adkisson > > It's on the tip of everyone's tongue. Everyone wants to not only > own an iPhone, but be writing their own applications for it. Brent > is going to help us cut through all of the documentation and jump > right into writing our own code for the iPhone. The talk will walk > us through the realms of Objective-C and Apple's Xcode developer > tools. This is one talk you do not want to miss! > > http://odynug.kicks-ass.org > > Meeting location is UNO's Peter Kiewit Institute (PKI) building > 1110 South 67th Street > Omaha, NE > > Hope to see everyone there! > > Cheers, > - Matt > > -- > Matt Secoske | biz: http://nimblelogic.com | tech: http:// > techomaha.com | personal: http://mattsecoske.com From dan at linder.org Wed Feb 11 09:09:14 2009 From: dan at linder.org (Dan Linder) Date: Wed, 11 Feb 2009 11:09:14 -0600 Subject: [Omaha.pm] [OT] Subversion assistance... Message-ID: <3e2be50902110909w503033d5g929d1dcc259094fb@mail.gmail.com> I've got some Subversion repository files (a .tar.gz of a persons local file:// repository) that I would like to put up on our Apache-hosted Subversion server for others to have access to. I've tried copying the files to a new repository directory on the server, but when I do a "svn co http://$server/newrepo" (or ../$server/repo/trunk) I get the message that this repository has been moved. :-( I know I could just check them out, remove the .svn directories, then push them into a new repository, but I was hoping to keep some of the old change logs. Anyone have any other ideas and/or possibly a tool (perl!) that I could try? Thanks, Dan p.s. this is using Subversion 1.5 if that helps. -- "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 travis at travisbsd.org Wed Feb 11 10:02:41 2009 From: travis at travisbsd.org (Travis McArthur) Date: Wed, 11 Feb 2009 12:02:41 -0600 Subject: [Omaha.pm] [OT] Subversion assistance... In-Reply-To: <3e2be50902110909w503033d5g929d1dcc259094fb@mail.gmail.com> References: <3e2be50902110909w503033d5g929d1dcc259094fb@mail.gmail.com> Message-ID: <499312C1.3030608@travisbsd.org> svnadmin help dump svnadmin help load That should take care of you. Best Regards, Travis Dan Linder wrote: > I've got some Subversion repository files (a .tar.gz of a persons > local file:// repository) that I would like to put up on our > Apache-hosted Subversion server for others to have access to. > > I've tried copying the files to a new repository directory on the > server, but when I do a "svn co http://$server/newrepo" (or > ../$server/repo/trunk) I get the message that this repository has been > moved. :-( > > I know I could just check them out, remove the .svn directories, then > push them into a new repository, but I was hoping to keep some of the > old change logs. > > Anyone have any other ideas and/or possibly a tool (perl!) that I > could try? > > Thanks, > > Dan > > p.s. this is using Subversion 1.5 if that helps. > > -- > "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) > ** *** ***** ******* *********** ************* > ------------------------------------------------------------------------ > > _______________________________________________ > Omaha-pm mailing list > Omaha-pm at pm.org > http://mail.pm.org/mailman/listinfo/omaha-pm From jhannah at omnihotels.com Wed Feb 11 14:00:09 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Wed, 11 Feb 2009 16:00:09 -0600 Subject: [Omaha.pm] Gotta love perl... Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC3D@l3exchange.omnihotels.net> $ head -100 Bookrq_Trace_2009-02-09_1.txt > j $ perl -pi -e 's/\r\n//g' j $ perl -pi -e 's/\|\|[^ -~]\d\d:\d\d/\n/g' j Another 5 minute assault on a multi-GB Windows file with funky delimiters... Laugh, j -------------- next part -------------- An HTML attachment was scrubbed... URL: From jhannah at omnihotels.com Wed Feb 11 16:46:39 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Wed, 11 Feb 2009 18:46:39 -0600 Subject: [Omaha.pm] XML::Twig demo Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC3E@l3exchange.omnihotels.net> Somebody asked me for a demo like this (irc.perl.org #perl-help) today. j $ cat j.pl #!/usr/bin/perl use strict; use XML::Twig; my $twig = XML::Twig->new( pretty_print => 'indented' )->parse('')->root; my @users = ( { firstname => 'Jay', lastname => 'Hannah' }, { firstname => 'Quentus', lastname => 'Rex' }, ); foreach (@users) { my $elt = XML::Twig::Elt->new( user => { firstname => $_->{firstname}, lastname => $_->{lastname} } ); $elt->paste( last_child => $twig ); } print $twig->sprint; $ perl j.pl -------------- next part -------------- An HTML attachment was scrubbed... URL: From jhannah at omnihotels.com Wed Feb 11 17:19:13 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Wed, 11 Feb 2009 19:19:13 -0600 Subject: [Omaha.pm] XML::Twig demo #2 Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC3F@l3exchange.omnihotels.net> Later he decided he wanted elements instead of attributes. :) j $ cat j.pl #!/usr/bin/perl use strict; use XML::Twig; my $twig = XML::Twig->new( pretty_print => 'indented' )->parse('')->root; my @users = ( { firstname => 'Jay', lastname => 'Hannah' }, { firstname => 'Quentus', lastname => 'Rex' }, ); foreach my $user (@users) { my $user_xml = XML::Twig::Elt->new('user'); foreach my $att (keys %$user) { my $xml = XML::Twig::Elt->new($att, $user->{$att}); $xml->paste( last_child => $user_xml ); } $user_xml->paste( last_child => $twig ); } print $twig->sprint; $ perl j.pl Jay Hannah Quentus Rex -------------- next part -------------- An HTML attachment was scrubbed... URL: From jhannah at omnihotels.com Thu Feb 12 05:47:46 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Thu, 12 Feb 2009 07:47:46 -0600 Subject: [Omaha.pm] Gotta love perl... In-Reply-To: <396CEDAA86B38646ACE2FEAA22C3FBF1017070AD@l3exchange.omnihotels.net> Message-ID: What? My 4 seconds of QA were insufficient? :) Try something like this? $ perl -pi -e 's/\|\|[^ -~](\d\d:\d\d)/\|\|\n$1/g' j j On 2/12/09 7:42 AM, "Sean Baker" wrote: > It would be even better if it worked... J > > I don?t think this is working as you intended, or it doesn?t for me: > > $ perl -pi -e 's/\|\|[^ -~]\d\d:\d\d/\n/g' j > > The regex seems to be corrupting the timestamp. Look at the beginning of each > line after you run it. > -------------- next part -------------- An HTML attachment was scrubbed... URL: From pbaker at omnihotels.com Thu Feb 12 06:07:56 2009 From: pbaker at omnihotels.com (Sean Baker) Date: Thu, 12 Feb 2009 08:07:56 -0600 Subject: [Omaha.pm] Gotta love perl... In-Reply-To: References: <396CEDAA86B38646ACE2FEAA22C3FBF1017070AD@l3exchange.omnihotels.net> Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1017070B2@l3exchange.omnihotels.net> This seemed to work for me: $ perl -pi -e "s/\\?\cM\cJ//g" sean $ perl -pi -e "s/\c@/\n/g" sean To recap, the goal was to get all of this pipe delimited goo on one line so I can manipulate easier. It has \^M control characters at the end, and a CTRL-@ (or \c@, aka NULL) at the very end that signifies a new line: 00:04:46,360 DEBUG [3148][] [REQUEST] ^M @HDR|ARS1P|HRSOM|IATC55F15|GMT090604|MSN1111118FC77E14D|UTTA|SCTCTJ|SGA1 P|SOBPL||\^M BOOKRQ|ACTSS|BKS1111111|CCN0000000|CHNOM|CTYAUS|GUTDX|GCTIK|GCN112991291 2912H\^M ti7sfMeLXU+Xnm1wd|GUEm7hUXOLrxek=|GNMPRICELINE|IND20FEB09|OTD22FEB09|NAD 2|NAMTEST\^M /TEST|NNT2|NPR2|NRM1|PID222222|RMR9999.99|RTYA1KCT3|SINIKXXX0108354597$P HR686706\^M 21102$NSM RM PRFD||^@^M Sean Baker Software Architect Omni Hotels (402) 952-6508 ________________________________ From: omaha-pm-bounces+pbaker=omnihotels.com at pm.org [mailto:omaha-pm-bounces+pbaker=omnihotels.com at pm.org] On Behalf Of Jay Hannah Sent: Thursday, February 12, 2009 7:48 AM To: omaha-pm at pm.org Subject: Re: [Omaha.pm] Gotta love perl... What? My 4 seconds of QA were insufficient? :) Try something like this? $ perl -pi -e 's/\|\|[^ -~](\d\d:\d\d)/\|\|\n$1/g' j j -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Thu Feb 12 06:41:55 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 12 Feb 2009 08:41:55 -0600 Subject: [Omaha.pm] Gotta love perl... In-Reply-To: <396CEDAA86B38646ACE2FEAA22C3FBF1017070B2@l3exchange.omnihotels.net> References: <396CEDAA86B38646ACE2FEAA22C3FBF1017070AD@l3exchange.omnihotels.net> <396CEDAA86B38646ACE2FEAA22C3FBF1017070B2@l3exchange.omnihotels.net> Message-ID: <97717A40-0090-461C-B751-CBDE1F7538D8@jays.net> Ooo! A priceline.com hotel room for only $9999.99 a night it Austin? I have no plans Feb 20-22! Sign me up!! :) j aka "TEST/TEST" On Feb 12, 2009, at 8:07 AM, Sean Baker wrote: > 00:04:46,360 DEBUG [3148][] [REQUEST] ^M > > @HDR|ARS1P|HRSOM|IATC55F15|GMT090604|MSN1111118FC77E14D|UTTA|SCTCTJ| > SGA1P|SOBPL||\^M > > BOOKRQ|ACTSS|BKS1111111|CCN0000000|CHNOM|CTYAUS|GUTDX|GCTIK| > GCN1129912912912H\^M > > ti7sfMeLXU+Xnm1wd|GUEm7hUXOLrxek=|GNMPRICELINE|IND20FEB09| > OTD22FEB09|NAD2|NAMTEST\^M > > /TEST|NNT2|NPR2|NRM1|PID222222|RMR9999.99|RTYA1KCT3| > SINIKXXX0108354597$PHR686706\^M > > 21102$NSM RM PRFD||^@^M > > From jay at jays.net Thu Feb 12 07:19:42 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 12 Feb 2009 09:19:42 -0600 Subject: [Omaha.pm] Carwash Challenge 2 - Lightning Talk Edition Message-ID: I have a proposal for an upcoming meeting format: We define a new challenge two weeks before an upcoming meeting, and then a series of people have 10 minutes to present their solution in the language of their choice. Who's interested, and what languages will you represent? Last time we got Python, Ruby, Perl, Lisp, and Erlang. :) j --------------------------- You may recall the first Blaine CarWash Challenge (May 2008). Check out the source code below and re-live those memories! Anonymous read/ write is active. http://jays.net/wiki/ODynUG#SVN $ svn checkout https://clabsvn.ist.unomaha.edu/anonsvn/user/jhannah/ dynamic_omaha dynamic_omaha A dynamic_omaha/ChemChains A dynamic_omaha/ChemChains/README.txt A dynamic_omaha/carwash A dynamic_omaha/carwash/challenge.txt A dynamic_omaha/carwash/python A dynamic_omaha/carwash/python/carwash_1.py A dynamic_omaha/carwash/python/carwash_2.py A dynamic_omaha/carwash/python/carwash_3.py A dynamic_omaha/carwash/python/carwash_4.py A dynamic_omaha/carwash/python/COPYING A dynamic_omaha/carwash/python/README.TXT A dynamic_omaha/carwash/ruby A dynamic_omaha/carwash/ruby/cw4.rb A dynamic_omaha/carwash/ruby/cw.rb A dynamic_omaha/carwash/ruby/cw2.rb A dynamic_omaha/carwash/ruby/cw3.rb A dynamic_omaha/carwash/perl A dynamic_omaha/carwash/perl/frobozz.pl A dynamic_omaha/carwash/perl/README.txt A dynamic_omaha/carwash/lisp A dynamic_omaha/carwash/lisp/carwash.el A dynamic_omaha/carwash/lisp/README.txt A dynamic_omaha/carwash/lisp/carwash.lisp A dynamic_omaha/carwash/erlang A dynamic_omaha/carwash/erlang/Emakefile A dynamic_omaha/carwash/erlang/Rakefile A dynamic_omaha/carwash/erlang/include A dynamic_omaha/carwash/erlang/include/packages.hrl A dynamic_omaha/carwash/erlang/src A dynamic_omaha/carwash/erlang/src/appointment.erl A dynamic_omaha/carwash/erlang/src/interface.erl A dynamic_omaha/carwash/erlang/src/moneybox.erl A dynamic_omaha/carwash/erlang/src/carwash.erl A dynamic_omaha/carwash/erlang/README A dynamic_omaha/carwash/erlang/ebin Checked out revision 539. From pbaker at omnihotels.com Fri Feb 13 09:12:46 2009 From: pbaker at omnihotels.com (Sean Baker) Date: Fri, 13 Feb 2009 11:12:46 -0600 Subject: [Omaha.pm] need 315k alpha-numeric numbers with a width of 6? Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF10170734A@l3exchange.omnihotels.net> I just had a request to generate 315k alpha-numeric numbers with a width of 6. Base 36 comes in handy! #!/usr/bin/perl use strict; use Math::Base36 ':all'; my $number = "60466176"; # = 100000 in base 36, width of 6 my $ctr=1; while ($ctr < 315001) { my $b36 = encode_base36($number); $number+=15; print "$b36\n"; $ctr++; } Wallah! I'm adding 15 to each number because I need a gap. Sean -------------- next part -------------- An HTML attachment was scrubbed... URL: From secoskem at gmail.com Fri Feb 13 13:12:02 2009 From: secoskem at gmail.com (Matt Secoske) Date: Fri, 13 Feb 2009 15:12:02 -0600 Subject: [Omaha.pm] [odynug] Carwash Challenge 2 - Lightning Talk Edition In-Reply-To: References: Message-ID: I'm all for it! On Thu, Feb 12, 2009 at 9:19 AM, Jay Hannah wrote: > > > I have a proposal for an upcoming meeting format: > > We define a new challenge two weeks before an upcoming meeting, and > then a series of people have 10 minutes to present their solution in > the language of their choice. > > Who's interested, and what languages will you represent? Last time we > got Python, Ruby, Perl, Lisp, and Erlang. :) > > j > > > > > --------------------------- > You may recall the first Blaine CarWash Challenge (May 2008). Check > out the source code below and re-live those memories! Anonymous read/ > write is active. > > http://jays.net/wiki/ODynUG#SVN > > $ svn checkout https://clabsvn.ist.unomaha.edu/anonsvn/user/jhannah/ > dynamic_omaha dynamic_omaha > A dynamic_omaha/ChemChains > A dynamic_omaha/ChemChains/README.txt > A dynamic_omaha/carwash > A dynamic_omaha/carwash/challenge.txt > A dynamic_omaha/carwash/python > A dynamic_omaha/carwash/python/carwash_1.py > A dynamic_omaha/carwash/python/carwash_2.py > A dynamic_omaha/carwash/python/carwash_3.py > A dynamic_omaha/carwash/python/carwash_4.py > A dynamic_omaha/carwash/python/COPYING > A dynamic_omaha/carwash/python/README.TXT > A dynamic_omaha/carwash/ruby > A dynamic_omaha/carwash/ruby/cw4.rb > A dynamic_omaha/carwash/ruby/cw.rb > A dynamic_omaha/carwash/ruby/cw2.rb > A dynamic_omaha/carwash/ruby/cw3.rb > A dynamic_omaha/carwash/perl > A dynamic_omaha/carwash/perl/frobozz.pl > A dynamic_omaha/carwash/perl/README.txt > A dynamic_omaha/carwash/lisp > A dynamic_omaha/carwash/lisp/carwash.el > A dynamic_omaha/carwash/lisp/README.txt > A dynamic_omaha/carwash/lisp/carwash.lisp > A dynamic_omaha/carwash/erlang > A dynamic_omaha/carwash/erlang/Emakefile > A dynamic_omaha/carwash/erlang/Rakefile > A dynamic_omaha/carwash/erlang/include > A dynamic_omaha/carwash/erlang/include/packages.hrl > A dynamic_omaha/carwash/erlang/src > A dynamic_omaha/carwash/erlang/src/appointment.erl > A dynamic_omaha/carwash/erlang/src/interface.erl > A dynamic_omaha/carwash/erlang/src/moneybox.erl > A dynamic_omaha/carwash/erlang/src/carwash.erl > A dynamic_omaha/carwash/erlang/README > A dynamic_omaha/carwash/erlang/ebin > Checked out revision 539. > > > --~--~---------~--~----~------------~-------~--~----~ > You received this message because you are subscribed to the Google Groups > "Omaha Dynamic Language User Group" group. > To post to this group, send email to odynug at googlegroups.com > To unsubscribe from this group, send email to > odynug+unsubscribe at googlegroups.com > For more options, visit this group at > http://groups.google.com/group/odynug?hl=en > -~----------~----~----~----~------~----~------~--~--- > > -- Matt Secoske | biz: http://nimblelogic.com | tech: http://techomaha.com | personal: http://mattsecoske.com -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Fri Feb 13 15:25:38 2009 From: jay at jays.net (Jay Hannah) Date: Fri, 13 Feb 2009 17:25:38 -0600 Subject: [Omaha.pm] What time is it? 1234567890? Message-ID: <49960172.2020409@jays.net> Only a couple more minutes until a crazy awesome nerd time! $ perl -e 'print time' 1234567662 j From evaddnomaid at gmail.com Fri Feb 13 16:09:04 2009 From: evaddnomaid at gmail.com (Dave Burchell) Date: Fri, 13 Feb 2009 18:09:04 -0600 Subject: [Omaha.pm] What time is it? 1234567890? In-Reply-To: <49960172.2020409@jays.net> References: <49960172.2020409@jays.net> Message-ID: <6e25cf310902131609n751cd2e7he9bfe8ca7b65c019@mail.gmail.com> It was a blessed moment. Thanks for the reminder, Jay, or I would have missed it. On Fri, Feb 13, 2009 at 5:25 PM, Jay Hannah wrote: > Only a couple more minutes until a crazy awesome nerd time! > > $ perl -e 'print time' > 1234567662 > > j > > > _______________________________________________ > Omaha-pm mailing list > Omaha-pm at pm.org > http://mail.pm.org/mailman/listinfo/omaha-pm > -- Dave Burchell -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Sat Feb 14 07:06:03 2009 From: jay at jays.net (Jay Hannah) Date: Sat, 14 Feb 2009 09:06:03 -0600 Subject: [Omaha.pm] What time is it? 1234567890? In-Reply-To: <49960F1E.80307@cox.net> References: <49960172.2020409@jays.net> <49960F1E.80307@cox.net> Message-ID: <1639DCCC-CF73-40A4-B14E-0EA8E62C9191@jays.net> On Feb 13, 2009, at 6:23 PM, Patrick Timmins wrote: > Jay ... you are *such* a geek :) > > ... hope you enjoyed it! Did I ever! I'm still reeling from it's awesomeness! http://headrattle.blogspot.com/search/label/perl j From jay at jays.net Sat Feb 14 09:14:42 2009 From: jay at jays.net (Jay Hannah) Date: Sat, 14 Feb 2009 11:14:42 -0600 Subject: [Omaha.pm] Bio::Tools::OddCodes and me Message-ID: -laugh- http://headrattle.blogspot.com/2009/02/reinventing-wheel-for-fun-and- profit.html j My blog, Perl only: Web: http://headrattle.blogspot.com/search/label/perl Atom (RSS): http://headrattle.blogspot.com/feeds/posts/default/-/perl From jay at jays.net Mon Feb 16 04:03:51 2009 From: jay at jays.net (Jay Hannah) Date: Mon, 16 Feb 2009 06:03:51 -0600 Subject: [Omaha.pm] Class::Sniff Message-ID: Ooo... Next time I'm thrown into a big ball of Perl I'm unfamiliar with, I'll give this namespace graphing solution a try: http://use.perl.org/~Ovid/journal/38483 http://search.cpan.org/~ovid/Class-Sniff-0.08/lib/Class/Sniff.pm I think I still need one that graphs out which subroutines call which subroutines though... j From dan at linder.org Mon Feb 16 11:20:09 2009 From: dan at linder.org (Dan Linder) Date: Mon, 16 Feb 2009 13:20:09 -0600 Subject: [Omaha.pm] [OT] Subversion assistance... In-Reply-To: <499312C1.3030608@travisbsd.org> References: <3e2be50902110909w503033d5g929d1dcc259094fb@mail.gmail.com> <499312C1.3030608@travisbsd.org> Message-ID: <3e2be50902161120h647713c4i4fc8c17b16894bbb@mail.gmail.com> Thanks for the notes. I've got one more question - probably much more basic but I'm banging my head against it. Regarding the trunk/tags/branch (TTB) directories that show up within the subversion repository... Should those be automatically created when I do the "svnadmin create", or should I be creating them myself manually? Here are the steps I've done but it seems like the mkdir steps shouldn't be needed since TTB are so central to the functioning of subversion. 1: svnadmin create $NEWREPO 2: chown -R apache:apache $NEWREPO 3: TEMPDIR=`mktemp -d $NEWREPO.XX` 4: svn co file:///path/to/$NEWREPO/ $TEMPDIR 5: mkdir $TEMPDIR/{branches,tags,trunk} 6: svn add $TEMPDIR/{branches,tags,trunk} 7: svn ci -m "Initial repository setup" $TEMPDIR/ 8: Create the entries in the Apache configuration file (/etc/httpd/conf.d/subversion.conf in RedHat/CentOS, /etc/apache2/mods-enabled/dav_svn.conf in Ubuntu/Debian): DAV svn SVNPath /srv/path/to/$NEWREPO AuthType Basic AuthName "$NEWREPO Repository" AuthUserFile /srv/path/to/.htpasswd Require valid-user 9: Restart apache After doing all this, I am able to perform a "svn co http://svnserver/path/to/$NEWREPO/trunk". Dan On Wed, Feb 11, 2009 at 12:02 PM, Travis McArthur wrote: > svnadmin help dump > svnadmin help load > > That should take care of you. > > Best Regards, > Travis > -- "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 jay at jays.net Mon Feb 16 11:39:00 2009 From: jay at jays.net (Jay Hannah) Date: Mon, 16 Feb 2009 13:39:00 -0600 Subject: [Omaha.pm] [OT] Subversion assistance... In-Reply-To: <3e2be50902161120h647713c4i4fc8c17b16894bbb@mail.gmail.com> References: <3e2be50902110909w503033d5g929d1dcc259094fb@mail.gmail.com> <499312C1.3030608@travisbsd.org> <3e2be50902161120h647713c4i4fc8c17b16894bbb@mail.gmail.com> Message-ID: <538ADE1C-47F5-4B63-8C95-8D55791597F2@jays.net> On Feb 16, 2009, at 1:20 PM, Dan Linder wrote: > Regarding the trunk/tags/branch (TTB) directories that show up > within the subversion repository... Should those be automatically > created when I do the "svnadmin create", or should I be creating > them myself manually? Those are best practice, but they're not mandatory, so you add them yourself. (Usually "branches/" not "branch/".) > 5: mkdir $TEMPDIR/{branches,tags,trunk} > 6: svn add $TEMPDIR/{branches,tags,trunk} "svn mkdir" is better -- does both of those in a single step. Do all six in a single step, actually: "svn mkdir branches tags trunk; svn commit" "svn rmdir" will come in handy eventually. Also, "svn mv" is magically delicious and should *always* be used rather moving something yourself. Other than that, looks fine to me. :) HTH, j From dan at linder.org Mon Feb 16 11:48:58 2009 From: dan at linder.org (Dan Linder) Date: Mon, 16 Feb 2009 13:48:58 -0600 Subject: [Omaha.pm] [OT] Subversion assistance... In-Reply-To: <538ADE1C-47F5-4B63-8C95-8D55791597F2@jays.net> References: <3e2be50902110909w503033d5g929d1dcc259094fb@mail.gmail.com> <499312C1.3030608@travisbsd.org> <3e2be50902161120h647713c4i4fc8c17b16894bbb@mail.gmail.com> <538ADE1C-47F5-4B63-8C95-8D55791597F2@jays.net> Message-ID: <3e2be50902161148v4a0b0022t461b40fd610eba8@mail.gmail.com> On Mon, Feb 16, 2009 at 1:39 PM, Jay Hannah wrote: > On Feb 16, 2009, at 1:20 PM, Dan Linder wrote: > >> Regarding the trunk/tags/branch (TTB) directories that show up within the >> subversion repository... Should those be automatically created when I do >> the "svnadmin create", or should I be creating them myself manually? >> > > Those are best practice, but they're not mandatory, so you add them > yourself. > > (Usually "branches/" not "branch/".) > Yup - mis-type on my part. > 5: mkdir $TEMPDIR/{branches,tags,trunk} >> 6: svn add $TEMPDIR/{branches,tags,trunk} >> > > "svn mkdir" is better -- does both of those in a single step. Do all six in > a single step, actually: "svn mkdir branches tags trunk; svn commit" > Yup, I've used those before with pre-made repositories and I've updated my script accordingly. > "svn rmdir" will come in handy eventually. > Also, "svn mv" is magically delicious and should *always* be used rather > moving something yourself. > Other than that, looks fine to me. :) > > HTH, Yes, it did very much. I'm now the sole Subversion knowledgeable person in our group (or at least the only one willing to admit it), so these tasks are now mine. :-) I really like it since Subversion stays simple and true to the "UNIX Way" of small files, simpler-is-better, etc. Thankfully the Perl and Linux mailing lists are full of diverse talents! 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 jay at jays.net Fri Feb 20 06:24:16 2009 From: jay at jays.net (Jay Hannah) Date: Fri, 20 Feb 2009 08:24:16 -0600 Subject: [Omaha.pm] The BioPerl Scrapbook Message-ID: <223334F4-C6E8-4A25-8EB0-77855C10DC5A@jays.net> Wow. Just stumbled into this: http://www.bioperl.org/wiki/Category:Scrapbook Unless I'm mistaken, some *hard* problems I've overheard people working on at UNO recently are sitting here, already solved. I even have a couple author credits. :) Some deep, deep magic is sitting here, free for the taking. I love it! j http://www.bioperl.org/wiki/User:Jhannah From jay at jays.net Fri Feb 20 13:22:52 2009 From: jay at jays.net (Jay Hannah) Date: Fri, 20 Feb 2009 15:22:52 -0600 Subject: [Omaha.pm] Job posting: Programmer/Analyst (Perl, Unix, SQL) Message-ID: <499F1F2C.8090806@jays.net> Programmer/Analyst (Perl, Unix, SQL) This position will be responsible for the development, testing, maintenance, documentation, and support of all information exchange related transactions. The candidate must possess strong knowledge and development skills in PERL, UNIX, and SQL. This position will be expected to analyze client requirements and specify design and develop programs, adhere to software development guidelines, and be able to meet deadline requirements. David S. Hannam Concentric Corporation Business Development Manager 402-991-8400 x102 david at concentriccorp.com www.concentriccorp.com From jhannah at omnihotels.com Mon Feb 23 05:07:59 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Mon, 23 Feb 2009 07:07:59 -0600 Subject: [Omaha.pm] woot! Our Catalyst re-skin is live Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC8C@l3exchange.omnihotels.net> https://ssl.omnihotels.com/ https://ssl.omnihotels.com/?debug_mode=1 :) j -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Tue Feb 24 04:49:07 2009 From: jay at jays.net (Jay Hannah) Date: Tue, 24 Feb 2009 06:49:07 -0600 Subject: [Omaha.pm] Slick use of Benchmark Message-ID: http://hanekomu.at/blog/benchmarks/20090223-1638- benchmarks_nested_data_structures.html :) Thanks http://twitter.com/perlbuzz !! j From jhannah at omnihotels.com Tue Feb 24 07:07:29 2009 From: jhannah at omnihotels.com (Jay Hannah) Date: Tue, 24 Feb 2009 09:07:29 -0600 Subject: [Omaha.pm] build.kiva.org Message-ID: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBCA4@l3exchange.omnihotels.net> Hey... http://build.kiva.org/ Ruby, Python, .NET, Java: http://blog.build.kiva.org/2009/02/17/the-first-two-weeks/ No Perl yet? Here's my chance to grab CPAN namespace if I could think of a reason I would care to wrap the brand spanking new Kiva API in Perl... Ponder, j -------------- next part -------------- An HTML attachment was scrubbed... URL: From jay at jays.net Thu Feb 26 06:16:28 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 26 Feb 2009 08:16:28 -0600 Subject: [Omaha.pm] woot! Our Catalyst re-skin is live In-Reply-To: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC8C@l3exchange.omnihotels.net> References: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC8C@l3exchange.omnihotels.net> Message-ID: <1FCD4F95-B601-450E-A935-49F558A84C19@jays.net> On Feb 23, 2009, at 7:07 AM, Jay Hannah wrote: > https://ssl.omnihotels.com/ > https://ssl.omnihotels.com/?debug_mode=1 Monday's rollout crushed out CMS vendor and we were down for several hours. (FUD headline: "the .NET CSS rendering is overwhelmed" - nervous laugh-) Yesterday it rolled out again, problem free this time: https://ssl.omnihotels.com/ Looks really great. :) Perl++ Catalyst++ (Template Toolkit)++ :) j From jay at jays.net Thu Feb 26 12:54:58 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 26 Feb 2009 14:54:58 -0600 Subject: [Omaha.pm] woot! Our Catalyst re-skin is live In-Reply-To: References: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC8C@l3exchange.omnihotels.net> <1FCD4F95-B601-450E-A935-49F558A84C19@jays.net> Message-ID: <49A701A2.1070700@jays.net> Christopher Cashell wrote: > Just a note, a few of the links across the bottom on > https://ssl.omnihotels.com are failing (Privacy Policy, ToS, Site > Map). It looks like they're probably using relative links and thus > pointing to ssl.omnihotels.com as opposed to www.omnihotels.com. They > currently get redirected back to the root page on > https://ssl.omnihotels.com/ when clicked, as opposed to brining up the > correct page. > You're hired!! :) Thanks for heads-up! Ticket opened on our side. j From dan at linder.org Thu Feb 26 14:10:11 2009 From: dan at linder.org (Dan Linder) Date: Thu, 26 Feb 2009 16:10:11 -0600 Subject: [Omaha.pm] woot! Our Catalyst re-skin is live In-Reply-To: <1FCD4F95-B601-450E-A935-49F558A84C19@jays.net> References: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC8C@l3exchange.omnihotels.net> <1FCD4F95-B601-450E-A935-49F558A84C19@jays.net> Message-ID: <3e2be50902261410s3d282400od46e5931eacebc57@mail.gmail.com> Jay, When I go to the https://ssl.omnihotels.com/ site, it looks pretty ugly (plain white background, blue text). Is there some missing CSS that my browser would have got hitting a different page first? Being a non-OmniHotels employee might be the key... Dan On Thu, Feb 26, 2009 at 8:16 AM, Jay Hannah wrote: > On Feb 23, 2009, at 7:07 AM, Jay Hannah wrote: > >> https://ssl.omnihotels.com/ >> https://ssl.omnihotels.com/?debug_mode=1 >> > > Monday's rollout crushed out CMS vendor and we were down for several hours. > (FUD headline: "the .NET CSS rendering is overwhelmed" -nervous laugh-) > > Yesterday it rolled out again, problem free this time: > > https://ssl.omnihotels.com/ > > Looks really great. :) > > Perl++ Catalyst++ (Template Toolkit)++ > > :) > > j > > > _______________________________________________ > Omaha-pm mailing list > Omaha-pm at pm.org > http://mail.pm.org/mailman/listinfo/omaha-pm > -- "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 jay at jays.net Thu Feb 26 14:21:46 2009 From: jay at jays.net (Jay Hannah) Date: Thu, 26 Feb 2009 16:21:46 -0600 Subject: [Omaha.pm] woot! Our Catalyst re-skin is live In-Reply-To: <3e2be50902261410s3d282400od46e5931eacebc57@mail.gmail.com> References: <396CEDAA86B38646ACE2FEAA22C3FBF1EDBC8C@l3exchange.omnihotels.net> <1FCD4F95-B601-450E-A935-49F558A84C19@jays.net> <3e2be50902261410s3d282400od46e5931eacebc57@mail.gmail.com> Message-ID: <49A715FA.6080706@jays.net> Dan Linder wrote: > When I go to the https://ssl.omnihotels.com/ site, it looks pretty ugly > (plain white background, blue text). Is there some missing CSS that my > browser would have got hitting a different page first? > > Being a non-OmniHotels employee might be the key... > If you could send me a screen shot and what version of what browser you're running you would be my hero forever. :) Or we could hire you and give you a cubicle from which the website is guaranteed to look good. :) j