Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re^3: date::manip question

by Kenosis (Priest)
on Feb 02, 2013 at 21:14 UTC ( #1016757=note: print w/ replies, xml ) Need Help??


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" );

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...

    :/

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1016757]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (16)
As of 2015-07-30 16:17 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (273 votes), past polls