use 5.010;
use DateTimeX::Auto ':auto';
use DateTime::Format::Human::Duration;

sub saydiff
{
	state $fmt = DateTime::Format::Human::Duration::->new;
	say $fmt->format_duration_between(@_);
}

saydiff('2009-02-12', '2012-02-12');
saydiff('2009-02-12', '2012-08-12');
saydiff('2009-02-12', '2012-08-11');
saydiff('2009-02-11', '2012-08-11');