my $d = new Date::Business();
...
my $temp_bd=$d;