diff options
| -rw-r--r-- | Plugin/Echo.pm | 26 | 
1 files changed, 26 insertions, 0 deletions
| diff --git a/Plugin/Echo.pm b/Plugin/Echo.pm new file mode 100644 index 0000000..9b23af8 --- /dev/null +++ b/Plugin/Echo.pm @@ -0,0 +1,26 @@ +#!/usr/bin/env perl + +package Plugin::Echo; + +use strict; +use warnings; + +my %config; + +sub configure { +	my $self = shift; +	my $cmdref = shift; +	my $cref = shift; +	%config = %$cref; + +	$cmdref->("echo", sub { $self->echo(@_); } ); + +	return $self; +} + +sub echo { +	my ($self, $logger, $who, $where, $rest, @arguments) = @_; + +	return $rest; +} +1; | 
