$_ = ':Admin!Admin@leet-A0B340B0.host.com PRIVMSG #channel :!quit';
$channel = '#channel';

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

__END__
output
======
Quiting!