my $name = 'a';
for my $file_in (@files) {
    rename $file_in, $name;
    $name++;
}