Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Date::Calc Alternative

by Jazz (Curate)
on Dec 30, 2001 at 08:03 UTC ( #135200=note: print w/replies, xml ) Need Help??

in reply to Date::Calc Module

I like Class::Date instead of Date::Calc for this kind of simple date math (where sql statements can't be used).

use Class::Date qw/ date localdate now /; my $cmpday = date( date( '2001-11-9' ) + '1M' + '20D' ); # add 1 month +, 20 days my $today = date( localdate( now ))->truncate; # truncate makes time +midnight. if ( $cmpday == $today ){ print "Today is $cmpday.\n"; } else { print +( Class::Date->new( $today ) - $cmpday )->day, " days away. +\n"; }

Date::Calc is definitely faster, so if you're needing lots of speedy date calcs, stick with Date::Calc. Docs for Class::Date is here.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://135200]
[Corion]: But yes, "who started this process" is interesting information :)
[tye]: no, I really believe that "login user" was added as a fundamental bit of info about each process in order to enhance the usefulness of auditing
[Corion]: Ah - if that information is saved in a file, then you could theoretically spam that file and confuse getlogin(). So, don't use it for authentication :)
[tye]: that is what getlogin() certainly *used* to do. I don't believe that is what it certainly should do.
[davido]: /var/run/utmp is 664 i think.
[tye]: Note that my "man getlogin" says that it uses stdin when it should use /dev/tty (calling a glibc bug). But that does not appear to be the case when I test it. But maybe Perl's getlogin() is not using glibc's getlogin().
[oiskuu]: well, run a strace and see what the getlogin does for you.... As I said. SELinux probably has those security labels. But not regular linux.
[tye]: for example, read https://unix. questions/146138/ loginuid-should-be -allowed-to-change -or-not-mutable-or -not
[tye]: I'm not using SELinux and it certainly appears to disagree with you. shrug
[tye]: Since you brought up /proc, oiskuu, I didn't see you respond to my suggestion of 'loginuid'. Does your /proc not have such?

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (9)
As of 2017-06-23 19:44 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (554 votes). Check out past polls.