Update of /cvsroot/http-webtest/HTTP-WebTest-Plugin-DateTest/lib/HTTP/WebTest/Plugin
In directory sc8-pr-cvs1:/tmp/cvs-serv2862/lib/HTTP/WebTest/Plugin
Modified Files:
DateTest.pm
Log Message:
fix for *argument isn't numeric* warning
Index: DateTest.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Plugin-DateTest/lib/HTTP/WebTest/Plugin/DateTest.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** DateTest.pm 31 Dec 2002 15:46:12 -0000 1.5
--- DateTest.pm 6 Mar 2003 17:42:24 -0000 1.6
***************
*** 16,20 ****
Version 1.00 - $Revision$
! Compatible with L<HTTP::WebTest|HTTP::WebTest> 2.00
=head1 SYNOPSIS
--- 16,21 ----
Version 1.00 - $Revision$
!
! Compatible with L<HTTP::WebTest|HTTP::WebTest> 2.x API
=head1 SYNOPSIS
***************
*** 201,204 ****
--- 202,206 ----
sub _seconds2str {
my ($date, $units) = @_;
+ return 'unknown' unless ($date =~ /^[+-]?[\d\.]+$/);
if (&TIMETAB($units)) {
return ($units eq 's') ? "$date s"
|