How to add a day using Time::Piece

[bangor]

I am trying to add a day to a date but can't get it to work - any ideas?

use Time::Piece;

my $t = gmtime;
print $t->ymd . "\n";
$t += ONE_DAY;
print $t->ymd . "\n";
my $t2 = $t + ONE_DAY;
print $t2->ymd . "\n";

prints...
2014-11-20
2014-11-20
2014-11-20

[Anonymous Monk]

Basic debugging checklist

#!/usr/bin/perl --
use strict;
use warnings;
use Time::Piece;

my $t = gmtime;
print $t->ymd . "\n";
$t += ONE_DAY;
print $t->ymd . "\n";
my $t2 = $t + ONE_DAY;
print $t2->ymd . "\n";
__END__
Bareword "ONE_DAY" not allowed while "strict subs" in use at - line 8.
Bareword "ONE_DAY" not allowed while "strict subs" in use at - line 10
+.
Execution of - aborted due to compilation errors.

[bangor]

Ah, thank you, as you say 'basic'. I thought that the constant ONE_DAY was from Time::Piece but it is in fact from Time::Seconds. Adding the line 'use Time::Seconds;' fixed it.