Re^3: date::manip question

in reply to Re^2: date::manip question
in thread date::manip question

On a side note, perhaps the following may be helpful:

my $date1 = UnixDate( ParseDate($raw_date1) || 'today', "%Y-%m-%d" );
[download]

This, instead of checking for an empty string, will either send a successful ParseDate or 'today' to UnixDate. I'd suggest a more comprehensive sanity check on the date data, but this will catch more than just an empty string.

Comment on Re^3: date::manip question Select or Download Code

Replies are listed 'Best First'.
Re^4: date::manip question by e5z8652 (Novice) on Feb 03, 2013 at 21:04 UTC
As you can tell from my posts, most of my Perl scripts are quick "get 'er done" type things. I am not a developer or programmer, but a jack-of-all-trades network guy. That being said I appreciate any advice. I'll probably clean them up now that they've broken and I'm looking at them anyway. I think in this case I got caught in the reversal of comparison operators between Bash and Perl. Per the ABSG chapter 7, the == operator is for strings and -eq is for integers. Exactly the opposite for Perl. So I probably had the Bash operators in mind when I wrote the original... :/	[reply]

Replies are listed 'Best First'.

Re^4: date::manip question
by e5z8652 (Novice) on Feb 03, 2013 at 21:04 UTC

As you can tell from my posts, most of my Perl scripts are quick "get 'er done" type things. I am not a developer or programmer, but a jack-of-all-trades network guy.

That being said I appreciate any advice. I'll probably clean them up now that they've broken and I'm looking at them anyway.

I think in this case I got caught in the reversal of comparison operators between Bash and Perl. Per the ABSG chapter 7, the == operator is for strings and -eq is for integers. Exactly the opposite for Perl. So I probably had the Bash operators in mind when I wrote the original...

[reply]

In Section Seekers of Perl Wisdom