Select Code to Download

#!perl -w 
use POSIX 'strftime';
...
    $time2 = strftime(%b %d, %y %T, $m_raw, $d0_raw, $y_raw, $hh_raw, 
+$mm_raw, $ss_raw);
    print "the formatted date time is: $time2 \n";

Argument "d" isn't numeric in modulus (%) at playdate.pl line 36.
Illegal modulus zero at playdate.pl line 36.