A quick-n-dirty bit of Perl I've meant to write for years now.

Give it a list of filenames that contain kindasorta RFC822ish text, and it will "touch" each file so that it's filesystem timestamp matches the "Date:" header.

#!/usr/bin/perl
use Date::Manip;
foreach $f (@ARGV) {
unless (open(F, $f)) { print STDERR "fail open $f: $!\n"; next; }
( Read more... )

Once again, woke up with my throat on fire. This had better not go on for more than another day. Once again, medicate and meditate, to clear it up. Somewhat.

Then down to elfs and omahas. We had "Fish Sunday", since I missed out on Fish Friday this week. The meal was a yummy spiced braised whitefish, couscous, and Omaha's wonderfully elegant and tasty ( Read more... )