Help for this page

Select Code to Download


  1. or download this
    use 5.020;
    use Test2::V0;
    ...
    ok( ($ddiff < 0 || $ddiff == 1), '1 day different or month wrap');
    $dstr = $nt->ymd ('-');
    is $dstr, '2023-03-26';
    
  2. or download this
    use 5.020;
    use Test2::V0;
    ...
    ok( ($ddiff < 0 || $ddiff == 1), '1 day different or month wrap');
    $dstr = $nt->ymd ('-');
    is $dstr, '2023-03-26';