foreach ('Private Message', 'Private Message to Dialog') { Xchat::hook_print($_, \&checkop); }
sub checkop { if ($_[0][1] =~ /^keyword/) { Xchat::command("mode #yourchan +o ".Xchat::strip_code($_[0][0])); } }