if($_ =~ /^:(.*)!(.*) PRIVMSG $channel :(.*)$/){
 my $user = $1;
 my $host = $2;
 my $message = $3;
 if($message =~ /^!quit$/){
  die "Quiting!\n";
 }
}

##</code><code>##

:Admin!Admin@leet-A0B340B0.host.com PRIVMSG #channel :!quit