sub lc_and_chomp {
  chomp $_[0];
  lc $_[0]; # is it in void context???
}

my $var = "fOobAR\n";
lc_and_chomp($var); # this alters $var
print $var;