my $d = Date->new() ->year(2010) ->month(3);