my $d = Date.today; say $d.yyyy-mm-dd;