Lines Matching refs:expires
144 -expires => '+3M',
152 like($c->expires, '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires in correct format');
164 ok(!defined $c->expires, 'expires is not set');
181 # ok(!defined $c->expires, 'expires is not set');
195 -expires => '+3M',
207 my $expires = $c->expires;
208 like($c->as_string, "/$expires/", "Stringified cookie contains expires");
228 ok($c->as_string !~ /expires/, "Stringified cookie has no expires field");
245 -expires => '+3M',
251 # have to use $c1->expires because the time will occasionally be
255 -expires => $c1->expires,
271 # have to use $c1->expires because the time will occasionally be
287 # Test name, value, domain, secure, expires and path
293 -expires => '+3M',
310 my $exp = $c->expires;
311 like($c->expires, '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires is correct');
312 like($c->expires('+12h'), '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires is set correctly');
313 like($c->expires, '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires now returns updated value');
314 isnt($c->expires, $exp, "Expiry time has changed");