=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== plum-2.33.1/module/auto/alias.plm-477-nick: plum,plum_j,plum-j plum-2.33.1/module/auto/alias.plm:478:name: B$W$i$` B$W$i$`$A$c$s plum-2.33.1/module/auto/alias.plm-479-user: *!plum@*.plum.org ############################################## plum-2.33.1/module/auto/alias.plm-585-B%(%$%j%"%9$rJQ99$9$k$?$a$K$O!" plum-2.33.1/module/auto/alias.plm:586:B!V%(%$%j%"%9JQ99 name B$W$i$`(B56) B$W$i$`(B2>)B!W$N$h$&$KH/8@$7$^$9!# plum-2.33.1/module/auto/alias.plm-587-B$3$N>l9g$G$O%?%$%W$,!VnameB!W$G!"%G!<%?$,!V$W$i$`(B56)B!W$H$$$&%(%$%j%"%9$,!" ############################################## plum-2.33.1/module/auto/nako.plm-179- @chan = &'array($'channellist[$serverno]); plum-2.33.1/module/auto/nako.plm:180: &privmsg($serverno, $chan[rand(@chan)], '', &system($userno, 'PUBACT')); plum-2.33.1/module/auto/nako.plm-181- } ############################################## plum-2.33.1/module/auto/nako.plm-228- &write($serverno, $prefix, $params[0], $arg); plum-2.33.1/module/auto/nako.plm:229: } elsif ($op eq (&system($userno, 'MEMOCOM') || $MEMOCOM)) { plum-2.33.1/module/auto/nako.plm-230- &memo($serverno, $prefix, $arg); ############################################## plum-2.33.1/module/auto/nako.plm-268- ($pass, $str) = split(/\s+/, $arg, 2); plum-2.33.1/module/auto/nako.plm:269: &'s_print($serverno, '', 'NICK', $str) if ($str && $pass eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD)); plum-2.33.1/module/auto/nako.plm-270- } elsif ($op eq 'FEEL?') { ############################################## plum-2.33.1/module/auto/nako.plm-304- } elsif ($op eq 'A' || $op eq 'a') { plum-2.33.1/module/auto/nako.plm:305: if ($arg eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD)) { plum-2.33.1/module/auto/nako.plm-306- $str = &message($userno, 'AWAY') || $AWAY; ############################################## plum-2.33.1/module/auto/nako.plm-311- } plum-2.33.1/module/auto/nako.plm:312: &'s_print($serverno, '', 'NICK', &system($userno, 'AWAYNICK') || $AWAYNICK); plum-2.33.1/module/auto/nako.plm-313- $alive[$serverno] = 0; ############################################## plum-2.33.1/module/auto/nako.plm-315- } elsif ($op eq 'J' || $op eq 'j') { plum-2.33.1/module/auto/nako.plm:316: if ($arg eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD)) { plum-2.33.1/module/auto/nako.plm-317- $str = &message($userno, 'JOIN') || $JOIN; ############################################## plum-2.33.1/module/auto/nako.plm-322- } plum-2.33.1/module/auto/nako.plm:323: &'s_print($serverno, '', 'NICK', &system($userno, 'NICK') || $NICK); plum-2.33.1/module/auto/nako.plm-324- $alive[$serverno] = 1; plum-2.33.1/module/auto/nako.plm-325- } plum-2.33.1/module/auto/nako.plm:326: } elsif ($op eq (&system($userno, 'DBCOM') || $DBCOM)) { plum-2.33.1/module/auto/nako.plm-327- &database($serverno, $prefix, $arg); plum-2.33.1/module/auto/nako.plm:328: } elsif ($op eq (&system($userno, 'SECRET') || $SECRET)) { plum-2.33.1/module/auto/nako.plm-329- if ($have{$userno, $arg}) { ############################################## plum-2.33.1/module/auto/nako.plm-337- } elsif ($op eq '*rehash*') { plum-2.33.1/module/auto/nako.plm:338: &load_msg($userno) if $arg eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD); plum-2.33.1/module/auto/nako.plm-339- } elsif ($selfpriv[$serverno] && time() > $time[$serverno]) { ############################################## plum-2.33.1/module/auto/nako.plm-354- $userno = $'userno[$serverno]; plum-2.33.1/module/auto/nako.plm:355: $file = &system($userno, 'MEMOF') || $MEMOF; plum-2.33.1/module/auto/nako.plm-356- &access($serverno, $prefix, $file, $msg); ############################################## plum-2.33.1/module/auto/nako.plm-418- @rest = (); plum-2.33.1/module/auto/nako.plm:419: $file = &system($userno, 'DENGONF') || $DENGONF; plum-2.33.1/module/auto/nako.plm-420- if (($idx = rindex($file, ';')) != -1) { ############################################## plum-2.33.1/module/auto/nako.plm-473- if ($str) { plum-2.33.1/module/auto/nako.plm:474: $file = &system($userno, 'DENGONF') || $DENGONF; plum-2.33.1/module/auto/nako.plm-475- if ($file && open(FILE, ">>$file")) { ############################################## plum-2.33.1/module/auto/nako.plm-506- $rate = rand(100); plum-2.33.1/module/auto/nako.plm:507: $learn = &system($userno, 'LEARN'); plum-2.33.1/module/auto/nako.plm-508- $learn = $LEARN unless defined($learn); ############################################## plum-2.33.1/module/auto/nako.plm-512- } plum-2.33.1/module/auto/nako.plm:513: $lrnspeak = &system($userno, 'LRNSPEAK'); plum-2.33.1/module/auto/nako.plm-514- $lrnspeak = $LRNSPEAK unless defined($lrnspeak); ############################################## plum-2.33.1/module/auto/nako.plm-678- $replace = 0; plum-2.33.1/module/auto/nako.plm:679: foreach $alias (&system($userno, 'ALIAS')) { plum-2.33.1/module/auto/nako.plm-680- ($src, $dst) = split(/ /, $alias, 2); ############################################## plum-2.33.1/module/auto/nako.plm-686- if (!$replace) { plum-2.33.1/module/auto/nako.plm:687: $title = &system($userno, 'TITLE') || $TITLE; plum-2.33.1/module/auto/nako.plm-688- $dst = $nick . $title; ############################################## plum-2.33.1/module/auto/yuurii.plm-125- $from = substr($prefix, 0, index($prefix, '!')); plum-2.33.1/module/auto/yuurii.plm:126: $where = substr($prefix, index($prefix, '!') + 1); plum-2.33.1/module/auto/yuurii.plm-127- } else { ############################################## plum-2.33.1/module/auto/yuurii.plm-192- undef &$sub if defined(&$sub); plum-2.33.1/module/auto/yuurii.plm:193: eval('sub ' . $sub . ' { ' . join('', @plugin) . ' }'); plum-2.33.1/module/auto/yuurii.plm-194- } ############################################## plum-2.33.1/module/sys/show.plm-11- $exec = join(' ', @params); plum-2.33.1/module/sys/show.plm:12: $result = eval($exec) || '0'; plum-2.33.1/module/sys/show.plm-13- &'c_print($clientno, '', 'NOTICE', $'nick[$clientno], $result); ############################################## plum-2.33.1/module/sys/timer.plm-25- next if &'exist($timerlist[$userno], $str); plum-2.33.1/module/sys/timer.plm:26: system(&'date($exec)); plum-2.33.1/module/sys/timer.plm-27- } ############################################## plum-2.33.1/module/sys/web.plm-1267-HTTPB%W%m%H%3%k$rMxMQ$9$k$3$H$G!"WebB%V%i%&%6$J$I$+$iIRCB$r9T$$$^$9!# plum-2.33.1/module/sys/web.plm:1268:B%U%l!<%`$rMQ$$$FI=<($rJ,3d$7$F$$$k$N$G!"%U%l!<%`$KBP1~$7$? plum-2.33.1/module/sys/web.plm-1269-WebB%V%i%&%6$,I,MW$G$9!# ############################################## plum-2.33.1/module/user/away/nick.plm-48- plum-2.33.1/module/user/away/nick.plm:49:B%K%C%/%M!<%`$rJQ99$7$?$H$-$K!"$=$N%K%C%/%M!<%`$KBP1~$9$kAWAYB$, plum-2.33.1/module/user/away/nick.plm-50-B;XDj$5$l$F$$$l$P!"$=$NAWAYB$r@_Dj$7$^$9!# ############################################## plum-2.33.1/plum-example.conf-47-auto.answer.reply: B$W$i$`%P!<%8%g%s #(name|nick|nick.now): PLUM OS 1.00 plum-2.33.1/plum-example.conf:48:auto.answer.reply: B$W$i$`$X%k%W B$W$i$`$K$O$3$s$J5!G=$,$"$j$^$9 plum-2.33.1/plum-example.conf-49-auto.answer.reply: B$W$i$`$X%k%W B%(%$%j%"%9$N@_Dj/BJQ99 plum-2.33.1/plum-example.conf:50:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`%(%$%j%"%9 plum-2.33.1/plum-example.conf:51:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`%(%$%j%"%9DI2C B%U%#!<%k%I B%G!<%? plum-2.33.1/plum-example.conf:52:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`%(%$%j%"%9:o=| B%U%#!<%k%I B%G!<%? plum-2.33.1/plum-example.conf:53:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`%(%$%j%"%9JQ99 B%U%#!<%k%I B5l%G!<%? B?7%G!<%? plum-2.33.1/plum-example.conf-54-auto.answer.reply: B$W$i$`$X%k%W B$*$_$/$8$r$R$/ plum-2.33.1/plum-example.conf:55:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`$*$_$/$8 plum-2.33.1/plum-example.conf-56-auto.answer.reply: B$W$i$`$X%k%W BEA8@ plum-2.33.1/plum-example.conf:57:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`EA8@ B%K%C%/%M!<%` BEA8@FbMF plum-2.33.1/plum-example.conf:58:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`EA8@65$($F plum-2.33.1/plum-example.conf-59-auto.answer.reply: B$W$i$`$X%k%W B>.Jq plum-2.33.1/plum-example.conf:60:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`>.Jq B%K%C%/%M!<%` B%3%a%s%H plum-2.33.1/plum-example.conf:61:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`>.JqAw$C$F plum-2.33.1/plum-example.conf-62-auto.answer.reply: B$W$i$`$X%k%W B$J$k$HG[$j plum-2.33.1/plum-example.conf:63:auto.answer.reply: B$W$i$`$X%k%W B!&$W$i$`$J$k$H plum-2.33.1/plum-example.conf-64- ############################################## plum-2.33.1/plum-example.conf-159-+ channel/join/connect.plm plum-2.33.1/plum-example.conf:160:channel.join.connect.channel: #B$W$i$`,%B$W$i$` plum-2.33.1/plum-example.conf-161-channel.join.connect.channel: #plum:*.jp,%B$^$I$+ ############################################## plum-2.33.1/support/clientname-43- if ($addr && $addr ne "\0\0\0\0") { plum-2.33.1/support/clientname:44: $name = (gethostbyaddr($addr, $AF_INET))[0]; plum-2.33.1/support/clientname-45- if ($name) { ############################################## plum-2.33.1/support/httpgate-289- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/support/httpgate:290: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/support/httpgate-291- return ($port, $ip, $host); ############################################## plum-2.33.1/support/multiproxy-157- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/support/multiproxy:158: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/support/multiproxy-159- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0001-use-debian-system-directory.patch/plum-1128- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0001-use-debian-system-directory.patch/plum:1129: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0001-use-debian-system-directory.patch/plum-1130- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0001-use-debian-system-directory.patch/plum-1136- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0001-use-debian-system-directory.patch/plum:1137: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0001-use-debian-system-directory.patch/plum-1138- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0002-fix-67526.patch/plum-1130- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0002-fix-67526.patch/plum:1131: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0002-fix-67526.patch/plum-1132- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0002-fix-67526.patch/plum-1138- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0002-fix-67526.patch/plum:1139: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0002-fix-67526.patch/plum-1140- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0003-shorten-timeout-to-20.patch/plum-1133- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0003-shorten-timeout-to-20.patch/plum:1134: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0003-shorten-timeout-to-20.patch/plum-1135- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0003-shorten-timeout-to-20.patch/plum-1141- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0003-shorten-timeout-to-20.patch/plum:1142: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0003-shorten-timeout-to-20.patch/plum-1143- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0004-Fix-340331-string-0-line-bug.patch/plum-1133- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0004-Fix-340331-string-0-line-bug.patch/plum:1134: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0004-Fix-340331-string-0-line-bug.patch/plum-1135- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0004-Fix-340331-string-0-line-bug.patch/plum-1141- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0004-Fix-340331-string-0-line-bug.patch/plum:1142: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0004-Fix-340331-string-0-line-bug.patch/plum-1143- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0005-Fix-jis_jis-function-SO-bug-204470.patch/plum-1133- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0005-Fix-jis_jis-function-SO-bug-204470.patch/plum:1134: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0005-Fix-jis_jis-function-SO-bug-204470.patch/plum-1135- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0005-Fix-jis_jis-function-SO-bug-204470.patch/plum-1141- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0005-Fix-jis_jis-function-SO-bug-204470.patch/plum:1142: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0005-Fix-jis_jis-function-SO-bug-204470.patch/plum-1143- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/alias.plm-478-nick: plum,plum_j,plum-j plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/alias.plm:479:name: B$W$i$` B$W$i$`$A$c$s plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/alias.plm-480-user: *!plum@*.plum.org ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/alias.plm-586-B%(%$%j%"%9$rJQ99$9$k$?$a$K$O!" plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/alias.plm:587:B!V%(%$%j%"%9JQ99 name B$W$i$`(B56) B$W$i$`(B2>)B!W$N$h$&$KH/8@$7$^$9!# plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/alias.plm-588-B$3$N>l9g$G$O%?%$%W$,!VnameB!W$G!"%G!<%?$,!V$W$i$`(B56)B!W$H$$$&%(%$%j%"%9$,!" ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-180- @chan = &'array($'channellist[$serverno]); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:181: &privmsg($serverno, $chan[rand(@chan)], '', &system($userno, 'PUBACT')); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-182- } ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-229- &write($serverno, $prefix, $params[0], $arg); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:230: } elsif ($op eq (&system($userno, 'MEMOCOM') || $MEMOCOM)) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-231- &memo($serverno, $prefix, $arg); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-269- ($pass, $str) = split(/\s+/, $arg, 2); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:270: &'s_print($serverno, '', 'NICK', $str) if ($str && $pass eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD)); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-271- } elsif ($op eq 'FEEL?') { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-305- } elsif ($op eq 'A' || $op eq 'a') { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:306: if ($arg eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD)) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-307- $str = &message($userno, 'AWAY') || $AWAY; ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-312- } plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:313: &'s_print($serverno, '', 'NICK', &system($userno, 'AWAYNICK') || $AWAYNICK); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-314- $alive[$serverno] = 0; ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-316- } elsif ($op eq 'J' || $op eq 'j') { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:317: if ($arg eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD)) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-318- $str = &message($userno, 'JOIN') || $JOIN; ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-323- } plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:324: &'s_print($serverno, '', 'NICK', &system($userno, 'NICK') || $NICK); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-325- $alive[$serverno] = 1; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-326- } plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:327: } elsif ($op eq (&system($userno, 'DBCOM') || $DBCOM)) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-328- &database($serverno, $prefix, $arg); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:329: } elsif ($op eq (&system($userno, 'SECRET') || $SECRET)) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-330- if ($have{$userno, $arg}) { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-338- } elsif ($op eq '*rehash*') { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:339: &load_msg($userno) if $arg eq (&system($userno, 'OWNPASSWD') || $OWNPASSWD); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-340- } elsif ($selfpriv[$serverno] && time() > $time[$serverno]) { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-355- $userno = $'userno[$serverno]; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:356: $file = &system($userno, 'MEMOF') || $MEMOF; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-357- &access($serverno, $prefix, $file, $msg); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-419- @rest = (); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:420: $file = &system($userno, 'DENGONF') || $DENGONF; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-421- if (($idx = rindex($file, ';')) != -1) { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-474- if ($str) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:475: $file = &system($userno, 'DENGONF') || $DENGONF; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-476- if ($file && open(FILE, ">>$file")) { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-507- $rate = rand(100); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:508: $learn = &system($userno, 'LEARN'); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-509- $learn = $LEARN unless defined($learn); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-513- } plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:514: $lrnspeak = &system($userno, 'LRNSPEAK'); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-515- $lrnspeak = $LRNSPEAK unless defined($lrnspeak); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-679- $replace = 0; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:680: foreach $alias (&system($userno, 'ALIAS')) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-681- ($src, $dst) = split(/ /, $alias, 2); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-687- if (!$replace) { plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm:688: $title = &system($userno, 'TITLE') || $TITLE; plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/nako.plm-689- $dst = $nick . $title; ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/yuurii.plm-126- $from = substr($prefix, 0, index($prefix, '!')); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/yuurii.plm:127: $where = substr($prefix, index($prefix, '!') + 1); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/yuurii.plm-128- } else { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/yuurii.plm-193- undef &$sub if defined(&$sub); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/yuurii.plm:194: eval('sub ' . $sub . ' { ' . join('', @plugin) . ' }'); plum-2.33.1/.pc/0006-adjust-path.patch/module/auto/yuurii.plm-195- } ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/show.plm-12- $exec = join(' ', @params); plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/show.plm:13: $result = eval($exec) || '0'; plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/show.plm-14- &'c_print($clientno, '', 'NOTICE', $'nick[$clientno], $result); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/timer.plm-26- next if &'exist($timerlist[$userno], $str); plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/timer.plm:27: system(&'date($exec)); plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/timer.plm-28- } ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/web.plm-1268-HTTPB%W%m%H%3%k$rMxMQ$9$k$3$H$G!"WebB%V%i%&%6$J$I$+$iIRCB$r9T$$$^$9!# plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/web.plm:1269:B%U%l!<%`$rMQ$$$FI=<($rJ,3d$7$F$$$k$N$G!"%U%l!<%`$KBP1~$7$? plum-2.33.1/.pc/0006-adjust-path.patch/module/sys/web.plm-1270-WebB%V%i%&%6$,I,MW$G$9!# ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/module/user/away/nick.plm-49- plum-2.33.1/.pc/0006-adjust-path.patch/module/user/away/nick.plm:50:B%K%C%/%M!<%`$rJQ99$7$?$H$-$K!"$=$N%K%C%/%M!<%`$KBP1~$9$kAWAYB$, plum-2.33.1/.pc/0006-adjust-path.patch/module/user/away/nick.plm-51-B;XDj$5$l$F$$$l$P!"$=$NAWAYB$r@_Dj$7$^$9!# ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/plum-1133- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0006-adjust-path.patch/plum:1134: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0006-adjust-path.patch/plum-1135- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/plum-1141- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0006-adjust-path.patch/plum:1142: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0006-adjust-path.patch/plum-1143- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/support/clientname-43- if ($addr && $addr ne "\0\0\0\0") { plum-2.33.1/.pc/0006-adjust-path.patch/support/clientname:44: $name = (gethostbyaddr($addr, $AF_INET))[0]; plum-2.33.1/.pc/0006-adjust-path.patch/support/clientname-45- if ($name) { ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/support/httpgate-289- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0006-adjust-path.patch/support/httpgate:290: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0006-adjust-path.patch/support/httpgate-291- return ($port, $ip, $host); ############################################## plum-2.33.1/.pc/0006-adjust-path.patch/support/multiproxy-157- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/.pc/0006-adjust-path.patch/support/multiproxy:158: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/.pc/0006-adjust-path.patch/support/multiproxy-159- return ($port, $ip, $host); ############################################## plum-2.33.1/plum-1133- ($port, $ip) = (unpack($SOCKADDR, getsockname($'socket[$no])))[1, 2]; plum-2.33.1/plum:1134: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/plum-1135- return ($port, $ip, $host); ############################################## plum-2.33.1/plum-1141- ($port, $ip) = (unpack($SOCKADDR, getpeername($'socket[$no])))[1, 2]; plum-2.33.1/plum:1142: $host = (gethostbyaddr(pack('N', $ip), $AF_INET))[0]; plum-2.33.1/plum-1143- return ($port, $ip, $host);