package PipSqueek::Plugin::ET; use base qw(PipSqueek::Plugin); use strict; sub plugin_initialize { my $self = shift; $self->plugin_handlers({ 'multi_et' => 'et_search', }); } sub et_search { my ($self,$message) = @_; my $args = $message->command_input(); return $self->respond($message, "!et server port") unless $args; my @args = split /\s+/, $args; return unless scalar @args; my $host = shift @args; my $port = shift @args; return $self->respond( $message,("BLEH") ); } 1; __END__