perl-sub-definition
[
plain text
]
sub RIGHT { my ($n) = @_; print "ChangeMe"; }