First of all forking date is usually a bad idea... You should look into the Date::Calc or Date::Manip modules. Some people also like the strftime routine in the POSIX module

That said, if you want to remove the newline from the $today variable, you should use chomp.

chomp($today = `date +%D`);
[download]

-Blake