Uri Guttman <u...@stemsystems.com> writes:
> whenever i print stuff for debugging i put it in [] or similar so i can 
> see
> white space or other odd things.
> 
> 
> try print "[$obtime[1]]" and see what is really there.

  DB<2> print "[$obtime[1]]"
[ 31 Oct 2018 06:53:00 -0500]

I do believe that the leading white space before the 3 should not
be there.

#get rid of leading spaces.
    $obtime[1] =~ s/^\s+//;
#get rid of trailing spaces.
    $obtime[1] =~ s/\s+$//;

  DB<2> print "[$obtime[1]]"

[31 Oct 2018 06:53:00 -0500]

One of the oldest admonitions in the book says "Never trust data."

        That leading space came from the split of a , separated
string and it completely got by me.

I'd like to say that it's working but not yet.  There seems to be
nothing wrong with the string now.

my $t1 = Time::Piece->strptime("$obtime[1], %d %b %Y %H:%M:%S %z");

Still the parse error.

        Right now, I do have  both

use Time::Local;
use Time::Piece;

in the program and Time::Piece is supposed to replace many of the
functions of Time::Local.  If I comment out Time::Local, a
reference to gntime breaks.

        Could this be causing Time::Piece not to work?

Martin McCormick

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to