my $last = $files[-1];