use strict;
use warnings;

my $a = "AbCdEfG";
$a = lc($a);
print $a;