Thomas's Journal http://use.perl.org/~Thomas/journal/ Thomas'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:28:32+00:00 pudge pudge@perl.org Technology hourly 1 1970-01-01T00:00+00:00 Thomas's Journal http://use.perl.org/images/topics/useperl.gif http://use.perl.org/~Thomas/journal/ Perl meetings/event calendar http://use.perl.org/~Thomas/journal/9448?from=rss Casey's <a href="http://use.perl.org/~cwest/journal/9427">journal</a> entry kinda sparked me to finally finish up what I had started well over a month ago. A shared <a href="http://cal.stderr.net/">calendar</a> application where usergroups/trainers could register their meetings/trainingsessions in so everyone would have a single place to go for all their perl event needs.<br> <br> Initially my interest in this was because of the ever debating when-is-the-next-meeting-thread on <a href="http://minneapolis.pm.org/">Minneapolis Perl Mongers</a> list. And because it's kind of sad that we don't have a calendar like that. Even the <a href="http://www.php.net/cal.php">PHP people</a> have one. So this is my attempt at it.<br> <br> Right now you can add events, flip through the calendar, and extract a RSS listing from it. I'm working on an administrative interface so I can let other people approve events before they go into the calendar.<br> <br> Comments? Thomas 2002-12-13T18:34:31+00:00 journal After life comes? http://use.perl.org/~Thomas/journal/4430?from=rss <p>Today on #apache@ircnet we had a fun little discussion about signatures and it turned into putting something about life in your signature.</p><p>&lt;Rias&gt; package life; BEGIN { die "Did you really think it was that easy?\n"; } 1;<br>&lt;steven&gt; package Life; sub DESTROY { return __PACKAGE__-&gt;new; } # Reincarnation</p><p>So we modified it a bit more to actually work and ended up with something like:</p><p>package Reincarnation;<br>sub DESTROY { Life-&gt;new; } 1;<br>package Life;<br>@Life::ISA = qw(Reincarnation);<br>sub new { bless {}, $_[0]; } 1;<br>package main; my $life = Life-&gt;new;</p><p>Which was kind of fun, 'cause it made perl segfault after a good amount of iterations (18021 times to be exact).</p><p>I'm sure someone else has made (and experienced) this before, but we found it very amusing. And thanks to Steven for making my day a bit fun<nobr> <wbr></nobr>;-)</p> Thomas 2002-04-24T18:01:58+00:00 journal Pictures from a Mpls.pm meeting http://use.perl.org/~Thomas/journal/2028?from=rss So, I took a few pictures from today's meeting - and since I'm not that good with names some aren't mentioned by their right name. The pictures can be seen at <a href="http://photos.eibner.dk/mpls.pm/2002-01-09/">http://photos.eibner.dk/mpls.pm/2002-01-09/</a>. Thomas 2002-01-10T04:16:45+00:00 journal Christmas, Digital Camera, Job http://use.perl.org/~Thomas/journal/1764?from=rss <p>This is my first journal entry.</p><p>So, I've been living in the States with my wife for 6 months now and I really like it. Moved all our stuff from Denmark this summer.</p><p>And last week I got a job writing Perl and mod_perl code for a company in St. Paul. It was well worth waiting for! The place rocks.</p><p>Today I went out and got a Canon G2 digital camera and it is very nice, what awesome pictures it takes!</p><p>And btw, Merry Christmas.</p> Thomas 2001-12-22T04:02:06+00:00 journal