implement ends_with via strip_suffix
[alt-git.git] / t / t4018 / perl-sub-definition
bloba507d1f64525216e40a963931c2ae6052e17e3d5
1 sub RIGHT {
2         my ($n) = @_;
3         print "ChangeMe";