gugod's Journal gugod's use Perl Journal 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-25T02:34:04+00:00 pudge Technology hourly 1 1970-01-01T00:00+00:00 gugod's Journal website relaunched <p>The website <a href=""></a> is officially lanched again.</p><p> It's now a blog powered by MTOS4 instead of a wiki, like it used to be. Therefore, one more perl blog.<nobr> <wbr></nobr>:) </p><p> We've been putting the translated release notes of all sorts buzzing modules into Chinese so it'll be more quickly understood by local people. </p><p> Last year I've put <a href="">shelling</a> into the world of Perl and now he is one of the major contributer in Thanks very much for his effort doing good article translations. He's awesome. </p> gugod 2008-11-19T23:22:48+00:00 journal SVK-Churn <p> Recently doing many svk hacking, including this new dist: <a href="">SVK-Churn</a>. </p><p> So SVK-Churn basically has the same idea of <a href="">SVN-Churn</a>, generating 3 kinds of statistic chart using <a href="">Chart::Strip</a>: </p><ul> <li>Linesof Code</li><li>Number of committers</li><li>Number of committs</li></ul><p> After 0.03, it installed as a svk sub-command rather then a stand-alone script. That's fine, because people have to have svk installed to use SVK-Churn anyway. To generate some chart, you do something like: </p><p> svk churn -o pugs.png<nobr> <wbr></nobr>//pugs </p><p> And wait for svk to traverse the whole <a href="">pugs</a> history and count lines of code changed on every revisions. Here's one result of the <a href="">Pugs</a> project. </p> gugod 2005-04-07T01:48:50+00:00 journal YAPC::Taipei <p>This would only be the second year of YAPC::Taipei, and thanks to autrijus we have so many hackers around the world gather at Danshui hacking about perl6(pugs), RT, Kwiki, and SVK.</p><p>I've recently add the revspec processing routine into SVK. And just finished a Spork::S5 spork plugin last night.</p><p>With all these great hackers around you'll always have lots of ideas to implement, and that's kind of brain-storming you cannot have during normal days.</p> gugod 2005-03-25T04:26:20+00:00 journal Maybe I can write it this way.. <tt># basics<br>sub a {@_[1]}<br>sub top { $_[0]-&gt;{top} = 1; @_ }<br>sub down { $_[0]-&gt;{down} =1; @_ }<br>sub off {@_}<br>sub those {@_}<br><br># do some real thing<br>sub stay {<nobr> <wbr></nobr>... }<br>sub watch {<nobr> <wbr></nobr>... }<br><br># then say...<br>stay off the shift;<br>watch $tv;<br>do any @job;<br>save those @whales;</tt> gugod 2004-08-09T12:45:11+00:00 useperl