perl-sub-definition   [plain text]

sub RIGHT {
	my ($n) = @_;
	print "ChangeMe";
}