| CGI::Untaint::date(3pm) | User Contributed Perl Documentation | CGI::Untaint::date(3pm) |
CGI::Untaint::date - validate a date
use CGI::Untaint; my $handler = CGI::Untaint->new($q->Vars); my $date = $handler->extract(-as_date => 'date');
This Input Handler verifies that it is dealing with a reasonable
date. Reasonably means anything that Date::Manip thinks is sensible, so you
could use any of (for example):
"December 12, 2001"
"12th December, 2001"
"2001-12-12"
"next Tuesday"
"third Wednesday in March"
See Date::Manip for much more information on what date formats are acceptable.
The resulting date will be a Date::Simple object. Date::Simple for more information on this.
By default ambiguous dates of the format 08/09/2001 will be treated as UK style (i.e. 8th September rather than 9th August)
If you want to change this, subclass it and override date_format()
Date::Manip does not play nicely with taint mode. In order to work around this we locally clobber Date::Manip's 'timezone' code. As we're only interested in dates rather than times, this shouldn't be much of an issue. If it is, then please let me know!
Date::Simple. Date::Manip.
Tony Bowden
Please direct all correspondence regarding this module to:
bug-CGI-Untaint-date@rt.cpan.org
Copyright (C) 2001-2005 Tony Bowden. All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| 2021-01-08 | perl v5.32.0 |