Re: Time::Local (how to handle bad input)

2013-01-09 Thread Bill Stephenson
On Jan 9, 2013, at 11:26 AM, Andy Bach wrote: > On Wed, Jan 9, 2013 at 10:11 AM, Bill Stephenson wrote: > >> date=11/01/2003 >> >> I want to trap bad data sent to time::local in a loop where I use these >> lines: >> >>my ($date_month, $date_day, $date_year) = split(/\//, >> $DOCUMENT-

Re: Time::Local (how to handle bad input)

2013-01-09 Thread Andy Bach
On Wed, Jan 9, 2013 at 10:11 AM, Bill Stephenson wrote: > date=11/01/2003 > > I want to trap bad data sent to time::local in a loop where I use these > lines: > > my ($date_month, $date_day, $date_year) = split(/\//, > $DOCUMENT->param("date")); > > $date_year = ($date_year-1900);