whoami7 - Manager
:
/
proc
/
self
/
root
/
usr
/
local
/
rvm
/
src
/
openssl-1.0.1i
/
crypto
/
lhash
/
Upload File:
files >> //proc/self/root/usr/local/rvm/src/openssl-1.0.1i/crypto/lhash/num.pl
#!/usr/local/bin/perl #node 10 -> 4 while (<>) { next unless /^node/; chop; @a=split; $num{$a[3]}++; } @a=sort {$a <=> $b } keys %num; foreach (0 .. $a[$#a]) { printf "%4d:%4d\n",$_,$num{$_}; }
Copyright ©2021 || Defacer Indonesia