Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: find index of specific array value that occurs multiple times

by Util (Priest)
on Mar 29, 2012 at 13:46 UTC ( #962403=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
    use strict;
    use warnings;
    #my @offset_n = map { $_ + 1 } @index_n;
    #print "    Conserved: ", join(',', @offset_c), "\n";
    #print "Not conserved: ", join(',', @offset_n), "\n";
  2. or download this
    $VAR1 = "        :***  *   .** *::***** **:::::**: ::*:*** :*****:*.**
    +*******: .:* *   **:.*.. *****.***:***:: ..*: **.* ****:*************
        Conserved: 9,10,11,14,19,20,22,25,26,27,28,29,31,32,38,39,44,46,47
    Not conserved: 0,1,2,3,4,5,6,7,8,12,13,15,16,17,18,21,23,24,30,33,34,3

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://962403]
[davido]: or on ubuntu /var/run/utmp
[Corion]: Otherwise, I would imagine that a user with a process still alive would lock that information in memory.
[davido]: so last -f /var/run/utmp on ubuntu provides similar (though more verbose) info
[oiskuu]: glibc getlogin just does ttyname() and falls back on getutline(); it's not security related at all. (reminds me of sendmail and remote finger services of the naive early spam era)
[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().

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

    Results (554 votes). Check out past polls.