fork download
copy 
  1. use 5.016;
  2. use warnings;
  3. use Time::Piece; 
  4.  
  5. my $t = localtime; 
  6. $t = $t->add_years(30); 
  7. say $t;
  8.  
Success #stdin #stdout 0.03s 4904KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Thu Aug 27 11:17:01 2043
https://ideone.com/OZ7WNj
language:
Perl (perl 5.28.1)
created:
11 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!