It looks fine.

If you want to do a sanity check try doing this:

foreach my $this_server ( @SERVERS ) {
  my $command = "cp $path/$this_server/etc/passwd .";
  warn "Will execute '$command'\n";
  # system ($command); # uncomment when ready.
}
[download]