mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-07 10:35:41 -04:00
8 lines
102 B
Text
8 lines
102 B
Text
|
|
sub {
|
|
my( $said ) = @_;
|
|
|
|
print $said->{body};
|
|
}
|
|
__DATA__
|
|
Echo just prints its argument verbatim.
|