# Make '3' into '03'
$some_value = sprintf "%02d", $some_value;

##</code><code>##

my $time = localtime();
if ($time =~ /^Tue/i) {
    if ($time =~ /2005$/) {
        print "It's some Tuesday in 2005\n";
    }
}