Help for this page

Select Code to Download


  1. or download this
    use DateTime;
    my $today = DateTime->today( time_zone => 'local' );
    ...
       $today->clone->subtract( years => 1, months => 1 )
    );
    print( $dur->in_units( 'days' ), " days\n" );