Select Code to Download

#!/usr/bin/perl
use strict;
...
print "$business_delta\n";
my $business_days = Date::Manip::Delta_Format($business_delta,2,'%dyd'
+);
print "$business_days\n";

2013100300:00:00
2013120900:00:00
...
66.87375
+0:2:+0:+4:0:0:0
64.87375