Select Code to Download

sub isFullYear{
my$startDay=shift;
...
    }
    return $fullYear;
}

my$years= ($cy-$y) * isFullYear($d,$cd ,$m,$cm);
$days= $days + NumberOfDaysBetween($d,31,$m,12) + NumberOfDaysBetween(
+1,$cd,1,$cm) + $years;
    print "$days";