Have you tried Date::Calc? update
this should work

use Date::Calc qw(:all);

$date= '10/24/2000';

$MM = substr($date,0,2);
$DD = substr($date,3,2);
$YYYY= substr($date,6,4);


$Dd = -1;

      ($year,$month,$day) =  Add_Delta_Days($YYYY,$MM,$DD, $Dd);


$prev_day = join('/',$month,$day,$year);

print "$prev_day";
[download]