gistfile1.pl

use Irssi;
use strict;
use vars qw($VERSION %IRSSI);
$VERSION = "1.0";
%IRSSI = (
    authors => "",
    contact => "",
    name => "",
    description => "",
    license => "",
    url => "",
);

sub public_handler {
    my ($server, $msg, $nick, $address, $target) = @_;

    if ($msg =~ m/\b$server->{nick}\b/i) {
        $target->set_level(MSGLEVEL_HILIGHT);
    }
}

Irssi::signal_add("message public", "public_handler");