more on date counting

[Toni_T_Banire]

Hi 
I am trying to work out how to determine how many days are between a set 
of dates excluding weekends..

So far I have figured out how to subtract one date from the other, see 
below.

The next section I would like help with is the bit that figures out how to 
ignore dates that are weekends.


use Date::Calc qw(:all); 
$mon = (1..12) [(localtime)[4]]; 
$yr=1900+$year; 
$wdays = (0..6) [(localtime)[6]]; 
$day1 = 26; 


$Dd = Delta_Days($yr,$nmon,$day1, $yr,$mon,$wdays); 
print $Dd; 



TIA 


Toni