charles/2004_ruc2> ./date_calc_test.pl
syntax error at ./date_calc_test.pl line 5, near "$days " Execution of ./date_calc_test.pl aborted due to compilation errors.

##</code><code>##

#!/usr/bin/perl

use Date::Calc qw(:all)

$days = Date_to_Days($year,$month,$day);
  ($year,$month,$day) = Add_Delta_Days(1,1,1, $days - 1);

print "$days\n";