Takes an input of a 24-hour time and converts to hex. I use this for McAfee Autoupdate registry changes...
print "Enter the time in 24 hour format:";
$time=<STDIN>;
($hours,$minutes)=split /:/, $time;
$con=(($minutes/256)+$hours)*256;
printf "%x", "$con";

[download]

Back to Cool Uses for Perl