Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
15 lines (11 sloc) 197 Bytes
package EchoStream;
use Moose;
extends 'Reflex::Stream';
sub on_data {
my ($self, $args) = @_;
$self->put($args->{data});
}
sub DEMOLISH {
print "EchoStream demolished as it should.\n";
}
1;
Something went wrong with that request. Please try again.