Skip to content

Instantly share code, notes, and snippets.

@delphinus

delphinus/gist:1749020

Created February 6, 2012 02:26
Show Gist options
  • Save delphinus/1749020 to your computer and use it in GitHub Desktop.
Save delphinus/1749020 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.pl
use DateTime;
my $d = DateTime->new(
year => 2012,
month => 1,
day => 1,
time_zone => 'Asia/Tokyo',
);
print $d->clone->add(months => 3)->ymd . "\n";
print $d->clone->add(days => 90)->ymd . "\n";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment