This is perl, v5.8.4 built for i86pc-solaris-64int
(with 32 registered patches, see perl -V for more detail)

Copyright 1987-2004, Larry Wall

##</code><code>##

(my $logname = $0) =~ /\.pl$/.log/;