if (/\[\[(\w|\s|!|#|\/|\.|-|\(|\)|\\|{|}|_|^|°|,|`|\/|;|'|\:|\[|\])*\]\]/i { my $wplink = linkify($&); my $retval = "http://de.wikipedia.org/wiki/" . encode('latin1',$wplink); $server->command("MSG $target $retval"); }