If you're at all worried about locale and language issues, or if you're just concerned about doing things the canonical way, you can use
$_ = lc $_; instead of
tr/A-Z/a-z/; to get a lowercase version.
lc and
uc are built in, and they honor the current language and localization settings.