#! /usr/bin/perl
use strict;
use warnings;

use 5.020;

use Date::Range;
use Date::Simple qw( date );

my $range = Date::Range->new(
    date('2000-02-25'),
    date('2000-03-04'),
);

say for $range->dates;

__END__