Questions about this topic? Sign up to ask in the talk tab.

User:Mike/wikilink.pl

From NetSec
Jump to: navigation, search

<syntaxhighlight lang="perl">use strict; use Irssi;

Irssi::signal_add 'message public', 'sig_message_public';

sub sig_message_public { 

 my ($server, $msg, $nick, $nick_addr, $target, $host, $text) = @_;
 my ($link, $linkname, $article, $artname);
 unless ($target =~ m/(?:ed-logging)/i) { #dofuckall here
   $article = $msg;
   $artname = $msg;
   if ($target =~ m/(?:bha-wiki
Retrieved from "http://nets.ec/index.php?title=User:Mike/wikilink.pl&oldid=7996"