use warnings;
use strict;
use feature 'say';
use Data::Dump 'pp';

sub mylc (_) {
	print "in=", pp @_;
	return lc $_[0]
}
sub mylc2 {  # no prototype for comparison
	print "in=", pp @_;
	return lc $_[0]
}