in reply to Validate date value
Hi ashok,
This is the another way to validate the date value.Try this
This is the another way to validate the date value.Try this
Punithause strict; use warnings; use Date::Calc qw(check_date); my ($mday, $mon, $year) = qw(28 02 2012); if (check_date($year,$mon,$mday)){ ####Your stuffs here } else{ print "Check the date is not a valid one\n"; }
|
---|
In Section
Seekers of Perl Wisdom