I was photographing this duck in the park today and made a lot of similar frames. I didn’t want to throw them all out, so I decided to play with all of them in Gimp. I like ‘Pekin Duck’ variation best of all.
Album location: /photos/2005/2005-07-06_POTD
Today I saw these two lines in one backup script that was written in perl:
my $d = (localtime())[6]; $d = $d=~/[067]/ ? 0 : $d % 2 + 1;
Does this look cryptic to you? Probably not. But I wanted to write something and thought that these two lines won’t be that obvious for everyone out there. So I decided to explain exactly what goes on.
Before I start, I have to say that these are not just any two random lines of perl code. These are very useful lines that provide a short and elegant solution to a rather common problem. Read on if you interested.
Shared bookmarks for del.icio.us user tvset on 2005-07-05
After I’ve complained on #perl channel that dprofpp (perl profiler) dies on me, I received a number of suggestions on how to profile the code without using dprofpp. Ideas ranged from elemetary insertion of ‘print “Started”, time,”\n”‘ to all sorts of dynamic subroutine overloading. Here is one elegant solution that was suggested:
sub foo { print "foo (@_)\n" }
sub bar { print "bar (@_)\n" }
for (qw(foo bar)) {
my $name = "main::" . $_;
my $old = *$name{CODE};
*$name = sub {
print scalar(localtime), " Started $name\n";
&$old;
print scalar(localtime), " Finished $name\n";
};
}
foo(qw(one two));
bar(qw(three four));
Oh, and someone also mentioned that dprofpp is known to be buggy. Here is a quote from the “Profiling Perl” article at perl.com:
The other problem you might face is that
Devel::DProf, being somewhat venerable, occasionally has problems keeping up on certain recent Perls, (particularly the 5.6.x series) and may end up segfaulting all over the place.
During the last few days I started to change my understanding of the word “enlightment”. I think I already mentioned that Maxim loves looking at light sources (lamps, windows, etc). He loved looking at them from his very first day in this world and he still enjoys it.
Sometimes he would lay on the bed looking at the light bulb, thinking about something. And than he would suddenly start talking in his meaningful manner (‘Rggggrgg’,’Arrrrgggrrgg’, etc). When I see him like this, I say that he just was “enlighted”. Thus “enlightment” is talking your mind out after watching a light source.