no warnings 'void';

sub {
	my( $said ) = @_;
	
	print  $said->{body};
};
__DATA__
Echo just prints its argument verbatim.