TorgoX's Friends' Journals TorgoX's Friends' use Perl Journals en-us use Perl; is Copyright 1998-2006, Chris Nandor. Stories, comments, journals, and other submissions posted on use Perl; are Copyright their respective owners. 2012-01-25T01:58:31+00:00 pudge Technology hourly 1 1970-01-01T00:00+00:00 TorgoX's Friends' Journals use Perl; Shutting Down Indefinitely <p>See <a href="">here</a>.</p> pudge 2010-09-08T22:07:47+00:00 useperl Cute caps <p>I'm doing some quick code generation (the output is Java), and I found myself writing the below routine. I like it because of the names I picked for the variables. Not exactly self-documenting (although it is when you think about it), but this is throwaway. You can probably tell what the code is doing and why I named the variables as I did, and you might be entertained.</p><blockquote><div><p> <tt>sub uc_prop<br>{<br>&nbsp; my($prop) = @_;<br>&nbsp; my $p = substr($prop, 0, 1);<br>&nbsp; my $P = uc($p);<br>&nbsp; my $rop = substr($prop, 1);<br>&nbsp; return "$P$rop";<br>}</tt></p></div> </blockquote> jdavidb 2010-08-19T21:55:41+00:00 journal use Perl; <p>I am no longer working for Slashdot/Geeknet as of September 30. I am actively seeking new employment. Unless you want to hire me, you don't need to care, unless you also care about <a href="">use Perl;</a>, because it has been generously hosted by Geeknet since I started the site over 10 years ago, shortly after I was hired by Andover.Net to work on Slashdot.</p><p>Long story short, I have not done much with the site in recent years, so my options at this point are to do nothing; migrate the site to a new server and keep it running as-is; or take the data and do something with it on a new site. Or something I haven't thought of.</p><p>I am hereby accepting proposals for what to do with use Perl;. In short, I would like to donate it to someone who will give it a good home. If you're interested, give me your best pitch.</p><p>Cross-posted on <a href="">&lt;pudge/*&gt;</a>.</p> pudge 2010-08-11T23:34:11+00:00 journal Matt Trout, aka mst, is insane <p>Wow. I occasionally, but not too often, go into #perl. Very busy with family and life. So I go in today, and for no reason, <a href="">mst</a> bans me and tells me to not come back.</p><p>What's up with him being such an irrational dick?</p> pudge 2010-08-11T16:41:54+00:00 journal Strawberry Perl install rolled back <p>Strawberry Perl 5.12.0 was almost completely installed when suddenly it flashed some message I didn't see into the install wizard and the progress bars started moving backward! I have never seen anything like it. I realized the progress bar caption had been changed to simply "Rolling Back Action" and watched as at least three anonymous "actions" were rolled back, progress bar by progress bar. Then the install wizard simply told me "Strawberry Perl Setup Wizard ended prematurely Strawberry Perl Setup Wizard ended prematurely because of an error. Your system has not been modified. To install this program at a later time, run Setup Wizard again. Click the Finish button to exit the Setup Wizard."</p><p>I wish it would tell me what the error was so I might have some hope of correcting it.</p> jdavidb 2010-07-26T20:34:33+00:00 journal Hiveminder: personal RT, for free <p>You mean someone will provide RT for me to use for free on the web? And they've built an awesome AJAX-y frontend for it? And they allow me to tag tasks and they encourage me to keep my work todo list and as many personal todo lists as I want in here? And they give me awesome search utilities for figuring this out and keeping it organized?</p><p>It's almost like <a href="">a dream come true</a>.</p> jdavidb 2010-07-19T16:58:36+00:00 journal Strawberry Win32 GUI programming <p>If I wanted to write a Strawberry program to run as a daemon and periodically pop up alerts on my machine, and I had no Windows Perl GUI programming experience other than an abortive look at WxPerl years before anybody ever thought of Strawberry, what module would I be looking for?</p> jdavidb 2010-06-09T15:10:53+00:00 journal Summary of Celtics vs. Lakers NBA Finals History <p>There have been 60 NBA Finals. The Boston Celtics have won 17, and the Minneapolis/Los Angeles Lakers have won 15, which amounts to those teams winning more than half of all NBA Finals. This year, they play each other in the Finals again, making it 33 champions out of 61 being either the Lakers or the Celtics.</p><p>Additionally, 39 of the 61 Finals have included either the Lakers or the Celtics. Including this year, the Celtics and Lakers have played each other in the Finals a whopping 12 times (just under one-fifth of all Finals have been these two teams).</p><p>The Celtics have made 21 total Finals appearances, so have faced the Lakers more than half of the times they've been in the Finals. The Lakers have made 30 Finals appearances, facing the Celtics in two-fifths of those.</p><p>The Celtics won nine of those against the Lakers, which accounts for more than half of all their 17 championships. The Lakers' two victories over the Celtics came after the Celtics won their first eight encounters.</p><p>The longest streak without either team in the Finals was eight years from '92-'99. The longest streak <b>with</b> either the Lakers or Celtics in the Finals was 10 years, done twice (from '57-'66, in which the Celtics appears all 10 years, and the Lakers five of those; and '80-'89, in which the Lakers appeared eight times, the Celtics five).</p><p>The longest streak for one team appearing in the Finals was, as noted, Boston, in the 10 years from '57-'66. Boston won nine of those 10 years, including eight in a row (the longest winning streak from any one team) from '59-'66, and also won 10 in 12 years, from '57-'69.</p><p>The Lakers' longest appearance streak is "only" four, from '82-'85, winning twice; but they have also appeared three times in a row five additional times (including the current three-year streak). In two of those, they won all three years; in one, they lost all three.</p><p>The only other team to "threepeat" was the Bulls, winning three years in a row twice in eight years ('91-'98). No other team but the Celtics and Lakers have had four consecutive appearances. The only other team to have three consecutive appearances was the Knicks, losing all three from '51-'53.</p><p>The 2010 NBA Finals begin in Los Angeles on Thursday.</p><p>Cross-posted on <a href="">&lt;pudge/*&gt;</a>.</p> pudge 2010-05-30T05:25:50+00:00 journal Another StackOverflow question moved: what's the deal? <p>Stack Overflow is made significantly less useful when ignorant people move Perl programming questions to because the questions are about <a href="">"servers, networks or the administration of many machines."</a>.</p><p>This kind of ridiculous micromanaging by people who are awarded points for being anti-helpful is what destroyed Wikipedia as a place I wanted to participate.</p> jdavidb 2010-05-20T14:18:10+00:00 journal Testing gurus, would you please chime in? <p>The question is how to test a class that installs system services: <a href=""><nobr>s<wbr></nobr> </a> </p> jdavidb 2010-05-07T17:16:23+00:00 journal Unique <p>I wonder how long it will be before people start just putting together random letters for names of companies, bands, and so on, so they can be unique in Google searches.</p><blockquote><div><p>Your search - fobhwueufg8 - did not match any documents.</p></div></blockquote><p>^^ my new band name</p><p>(Hm, "Did Not Match Any Documents" would be a fun band name. Or the name of the debut album of the band fobhwueufg8.)</p><p>Cross-posted on <a href="">&lt;pudge/*&gt;</a>.</p> pudge 2010-04-26T17:45:28+00:00 journal Top-level namespace pollution is evil <p>Why's it evil? Because not everyone hunts for modules by using a search engine. Because you're less likely to see that you're needlessly reinventing the wheel. <em>et cetera et cetera</em></p><p>People need to read <a href="'s-in-a-name?">perlmodstyle</a> and think before they upload. Indeed, PAUSE should exact a pound of flesh or some other substitute before accepting top-level modules.</p><p>While we're at it, maybe we can thunk people with a clue-by-four who don't include a module description, etc.</p> belg4mit 2010-04-22T22:57:26+00:00 journal Ball of mud song <p>Anyone got any good songs about working on a ball of mud?</p> jdavidb 2010-04-20T15:01:23+00:00 journal My Slashroulette Videos <p>Today Slashdot did a spoof of Chatroulette, that we called Slashroulette. We prerecorded videos of ourselves and others. Here's five of the six I did (the sixth was me tuning the guitar, I didn't post that one on YouTube): <a href="">video 1</a>, <a href="">video 2</a>, <a href="">video 3</a>, <a href="">video 4</a>, <a href="">video 5</a>.</p><p>Cross-posted on <a href="">&lt;pudge/*&gt;</a>.</p> pudge 2010-04-02T05:15:16+00:00 journal From UTC to US/Central <p>I've been living on UTC time since just before the end of Daylight Saving Time, 2005. Today I have reset my workstation to Central time. It's like looking at the world with fresh eyes.</p><p>My settings on websites will follow at some point.</p> jdavidb 2010-04-01T17:57:23+00:00 journal RIP Jaime Escalante Jaime Escalante, America's best math teacher, passed away last night. Escalante built a spectacular mathematics program in a struggling inner-city school district, teaching disadvantaged children all the way through Advanced Placement Calculus. His story was depicted in the 1988 film Stand and Deliver. I've got to say this man was really one of my personal heroes. When Sarah and I started talking about homeschooling our children it was thoughts of Mr. Escalante that made me get really serious about the kind of education our children could have with us directing. jdavidb 2010-03-31T12:43:26+00:00 journal Things I didn't know about the Walls <p>Larry's son, Lewis, is writing a 2D game engine in Perl 6 using Rakudo (<a href=""></a>).</p><p>Larry's wife, Gloria, took the Revised Common Lectionary and expanded it to make a complete Bible reading program which covers the entire Bible in three years (<a href=""></a>). And I wonder if maybe I'm not the only person in history who's ever written a program in Perl to divide up the Bible for reading, after all...</p> jdavidb 2010-03-19T17:00:01+00:00 journal My Netgear Router is Dumber Than It Thinks It Is <p>I upgraded the firmware on my Netgear router today and it wouldn't let me use the LAN IP I usually use for it,, because it thinks my ISP uses that subnet, because I set the router to read from my own internal DNS. Took me awhile to figure out <b>why</b> it thought what it did, because it didn't occur to me that it would care what DNS addresses I gave it.</p><p>Cross-posted on <a href="">&lt;pudge/*&gt;</a>.</p> pudge 2010-02-07T02:09:27+00:00 journal Franchise Tag Whiners <p>There's a long line of players in the NFL who claim that it is a personal offense when their teams place the franchise tag on them.</p><p>These players are big fat babies.</p><p>The players agreed to the franchise tag for the owners, as a compromise. The players take advantage of everything available to them under the contract; why shouldn't the owners do the same?</p><p>Stop crying. Stop whining. Sure, you don't like it, but so what? Grow up. Those are the rules that you agreed to.</p> pudge 2010-01-30T18:52:27+00:00 journal ah, dreams... <p>I just woke from a dream where it was rjbs' birthday and we got him an onion cake. Only the person who made the cake misunderstood, and instead of a cake shaped like an onion he cooked it WITH onions in it.</p><p>Bizarro.</p> Matts 2010-01-26T10:31:17+00:00 journal Time::Piece test failures on Win32 <p>Can someone with Time::Piece test failures on Win32 please contact me offlist? I have a proposed patch I'd like to test, but no Win32 perl to test it on.</p> Matts 2010-01-25T23:23:53+00:00 journal Perl 10.1.0 doesn't build on Cygwin <p>Is building on Cygwin not supported any more, I take it? Did we forget about it?</p><blockquote><div><p> <tt>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; CCCMD =&nbsp; gcc -DPERL_CORE -c -DPERL_USE_SAFE_PUTENV -U__STRICT_ANSI__ -<br>fno-strict-aliasing -pipe -I/usr/local/include&nbsp; -O3 -Wall -W -Wextra -Wdeclarati<br>on-after-statement -Wendif-labels<br>PATH=/home/dblackstone/perl-5.10.1:.:/home/dblackstone/bin:/hom<nobr>e<wbr></nobr> <nobr> <wbr></nobr>/dblackstone/bin<br>:/usr/local/bin:/usr/bin:/bin:/usr/X11R6/bin:/cygdrive/c/Prog<nobr>r<wbr></nobr> am\ Files\ (x86)/J<br>ava/jdk1.6.0_16/bin:/cygdrive/c/WINDOWS/system32:/cygdrive/c/WINDOWS:/<nobr>c<wbr></nobr> ygdrive/c<br>/WINDOWS/System32/Wbem:/cygdrive/c/Program\ Files\ (x86)/ZipGenius\ 6/:/cygdrive<br>/c/Program\ Files/MySQL/MySQL\ Server\ 5.1/bin:/cygdrive/c/apache-ant-1.7.1/bin:<br>/cygdrive/c/Program\ Files\ (x86)/Git/cmd:/cygdrive/c/Program\ Files\ (x86)/cvsn<br>t:/cygdrive/c/Program\ Files\ (x86)/PuTTY:/cygdrive/c/Program\ Files\ (x86)/GnuW<br>in32/bin:/cygdrive/c/strawberry/c/bin:/cygdrive/c/strawberry/perl/b<nobr>i<wbr></nobr> n:/cygdrive/<br>c/Program\ Files\ (x86)/QuickTime/QTSystem/:/usr/lib/lapack:/usr/local:/etc:/usr<br>/lib:/lib:/sbin<nobr>:<wbr></nobr> <nobr> <wbr></nobr>/usr/sbin:/usr/libexec gcc -Wl,--enable-auto-import -Wl,--export<br>-all-symbols -Wl,--stack,8388608 -Wl,--enable-auto-image-base -L/usr/local/lib -<br>o miniperl.exe \<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;malloc.o gv.o toke.o perly.o pad.o regcomp.o dump.o util.o mg.o ree<br>ntr.o mro.o hv.o av.o run.o pp_hot.o sv.o pp.o scope.o pp_ctl.o pp_sys.o doop.o<br>doio.o regexec.o utf8.o taint.o deb.o universal.o xsutils.o globals.o perlio.o p<br>erlapi.o numeric.o mathoms.o locale.o pp_pack.o pp_sort.o cygwin.o \<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; miniperlmain.o opmini.o perlmini.o -ldl -lcrypt<br>/bin/sh: -c: line 0: syntax error near unexpected token `('<br>/bin/sh: -c: line 0: `PATH=/home/dblackstone/perl-5.10.1:.:/home/dblackstone/bin<br>:/home/dblackstone<nobr>/<wbr></nobr> bin:/usr/local/bin:/usr/bin:/bin:/usr/X11R6/bin:/cygdrive/c/P<br>rogram\ Files\ (x86)/Java/jdk1.6.0_16/bin:/cygdrive/c/WINDOWS/system32:/cygdrive<br>/c/WINDOWS:/<nobr>c<wbr></nobr> ygdrive/c/WINDOWS/System32/Wbem:/cygdrive/c/Program\ Files\ (x86)/Z<br>ipGenius\ 6/:/cygdrive/c/Program\ Files/MySQL/MySQL\ Server\ 5.1/bin:/cygdrive/c<br>/apache-ant-1.7.1/bin:/cygdrive/c/Program\ Files\ (x86)/Git/cmd:/cygdrive/c/Prog<br>ram\ Files\ (x86)/cvsnt:/cygdrive/c/Program\ Files\ (x86)/PuTTY:/cygdrive/c/Prog<br>ram\ Files\ (x86)/GnuWin32/bin:/cygdrive/c/strawberry/c/bin:/cygdrive/c/strawber<br>ry/perl/b<nobr>i<wbr></nobr> n:/cygdrive/c/Program\ Files\ (x86)/QuickTime/QTSystem/:/usr/lib/lapac<br>k:/usr/local:/etc:/usr/lib:/lib:/sbin<nobr>:<wbr></nobr> <nobr> <wbr></nobr>/usr/sbin:/usr/libexec gcc -Wl,--enable-au<br>to-import -Wl,--export-all-symbols -Wl,--stack,8388608 -Wl,--enable-auto-image-b<br>ase -L/usr/local/lib -o miniperl.exe \'<br>make[1]: *** [miniperl.exe] Error 2<br>make[1]: Leaving directory `/home/dblackstone/perl-5.10.1'<br>make: *** [install] Error 2</tt></p></div> </blockquote> jdavidb 2010-01-14T17:16:42+00:00 journal Moving 32-bit Intel Perl to Mac OS X 10.6 <p>Dear Google,</p><p>When you move a 32-bit x86 perl installation to a 64-bit Mac OS X 10.6 environment, you should edit $ARCH/ and add "-arch i386" to lddlflags, ldflags, and ccflags. The compiler and tools in Mac OS X 10.6 assume 64 bits unless you explicitly tell it otherwise, but some 32-bit installs don't bother putting in an -arch flag, because at the time it wasn't necessary.</p><p>Cross-posted on <a href="">&lt;pudge/*&gt;</a>.</p> pudge 2010-01-12T17:39:58+00:00 journal Stack Overflow career spam <p>I got a fairly innocuous spam from Stack Overflow advertising their new job hunting site, where they would like me to upload my resume.</p><p>Sorry, Stack Overflow; I'm <a href="">smart for that</a> (thanks to Andy Lester). I also don't particularly appreciate the spam, although it's the first I've ever gotten and wasn't too obtrusive.</p> jdavidb 2010-01-07T15:26:00+00:00 journal CPAN bug tracker update <p>Hooray! CPAN's RT has been upgraded to the modern 3.8 series.</p> belg4mit 2010-01-06T14:24:06+00:00 journal Warning compiling perl stuff on Snow Leopard <p>I've searched but can't find any reference to this...</p><p>Compiling IO::KQueue on Snow Leopard I get the following warning:</p><blockquote><div><p> <tt>KQueue.xs: In function 'XS_IO__KQueue_kevent':<br>KQueue.xs:71: warning: format not a string literal and no format arguments</tt></p></div> </blockquote><p>Yet that line is just:</p><blockquote><div><p> <tt>&nbsp; &nbsp; Newxz(ke, max_events, struct kevent);</tt></p></div> </blockquote><p>Which seems to me pretty standard perl, and no format strings involved (though Newxz expands quite a few macros).</p> Matts 2010-01-04T22:13:57+00:00 journal SVK retired <p>I didn't notice, but SVK <a href="">retired</a> in May. Thanks to its authors and Best Practical for providing it. I agree with the sentiment that people moved on from Subversion quicker than expected; I am glad that I went on to git instead of spending too much time with SVK, although I would've liked to have learned it earlier and gotten to know it better.</p> jdavidb 2009-12-21T22:00:29+00:00 journal 19100 all over again I just saw a website say "Today is: December 17, 109"<nobr> <wbr></nobr>:) jdavidb 2009-12-17T19:42:14+00:00 journal Perl 5.11.2 <div><p>&#160; The streets were pretty quiet, which was nice. They&#39;re always quiet here<br>&#160; at that time: you have to be wearing a black jacket to be out on the<br> &#160; streets between seven and nine in the evening, and not many people in the<br> &#160; area have black jackets. It&#39;s just one of those things. I currently live<br> &#160; in Colour Neighbourhood, which is for people who are heavily into colour.<br> &#160; All the streets and buildings are set for instant colourmatch: as you<br> &#160; walk down the road they change hue to offset whatever you&#39;re wearing.<br> &#160; When the streets are busy it&#39;s kind of intense, and anyone prone to<br> &#160; epileptic seizures isn&#39;t allowed to live in the Neighbourhood, however<br> &#160; much they&#39;re into colour.<br> &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160;- Michael Marshall Smith, &quot;Only Forward&quot; </p><p> It gives me great pleasure to announce the release of Perl 5.11.2. </p><p> This is the third DEVELOPMENT release in the 5.11.x series leading to a stable release of Perl 5.12.0. You can find a list of high-profile changes in this release in the file &quot;perl5112delta.pod&quot; inside the distribution. </p><p> You can download the 5.11.2 release from: </p><p>&#160;&#160; <a href=""></a> </p><p> The release&#39;s SHA1 signatures are: </p><p>&#160;&#160; 2988906609ab7eb00453615e420e47ec410e0077 &#160;perl-5.11.2.tar.gz</p><div><p>&#160;&#160; 0014442fdd0492444e1102e1a80089b6a4649682 &#160;perl-5.11.2.tar.bz2<br> <br> We welcome your feedback on this release. If you discover issues with Perl 5.11.2, please use the &#39;perlbug&#39; tool included in this distribution to report them. If Perl 5.11.2 works well for you, please use the &#39;perlthanks&#39; tool included with this distribution to tell the all-volunteer development team how much you appreciate their work.<br> <br> If you write software in Perl, it is particularly important that you test your software against development releases. While we strive to maintain source compatibility with prior stable versions of Perl wherever possible, it is always possible that a well-intentioned change can have unexpected consequences. If you spot a change in a development version which breaks your code, it&#39;s much more likely that we will be able to fix it before the next stable release. If you only test your code against stable releases of Perl, it may not be possible to undo a backwards-incompatible change which breaks your code.<br> <br> Notable changes in this release:</p><ul> <li> It is now possible to overload the C operator</li><li> Extension modules can now cleanly hook into the Perl parser to define new kinds of keyword-headed expression and compound statement</li><li> The lowest layers of the lexer and parts of the pad system now have C APIs available to XS extensions</li><li> Use of C&lt;:=&gt; to mean an empty attribute list is now deprecated</li></ul><p> Perl 5.11.2 represents approximately 3 weeks development since Perl 5.11.1 and contains 29,992 lines of changes across 458 files from 38 authors and committers:<br> <br> Abhijit Menon-Sen, Abigail, Ben Morrow, Bo Borgerson, Brad Gilbert, Bram, Chris Williams, Craig A. Berry, Daniel Frederick Crisman, Dave Rolsky, David E. Wheeler, David Golden, Eric Brine, Father Chrysostomos, Frank Wiegand, Gerard Goossen, Gisle Aas, Graham Barr, Harmen, H.Merijn Brand, Jan Dubois, Jerry D. Hedden, Jesse Vincent, Karl Williamson, Kevin Ryde, Leon Brocard, Nicholas Clark, Paul Marquess, Philippe Bruhat, Rafael Garcia-Suarez, Sisyphus, Steffen Mueller, Steve Hay, Steve Peters, Vincent Pit, Yuval Kogman, Yves Orton, and Zefram.<br> <br> Many of the changes included in this version originated in the CPAN modules included in Perl&#39;s core. We&#39;re grateful to the entire CPAN community for helping Perl to flourish.<br> <br> Jesse Vincent or a delegate will release Perl 5.11.3 on December 20, 2009. Ricardo Signes will release Perl 5.11.4 on January 20, 2010. Steve Hay will release Perl 5.11.5 on February 20, 2010.<br> <br> Regards, L&#233;on</p></div></div> acme 2009-11-21T08:56:15+00:00 journal - redesign <p> Well, it's taken me 6 weeks of evenings and the odd weekend, but I'm proud to say the new <a href=""></a> site has just gone live. </p><p> This is a complete redesign and content review. Hopefully it's cleaner and easier for people to actually get the information they are after. </p><p> Whilst I was at it I also implemented this skin for <a href=""></a> and <a href=""></a> (which needs a lot more loving now you can actually see what's there... not much). </p><p> My work (<a href=""></a>) have donated some of my time, and also some of the designers on my team's time, without which it would have taken even longer. </p><p> So enjoy! </p> Ranguard 2009-11-12T22:33:25+00:00 journal