open TEST, ">>$savename" or
  print LOG "Couldn't open file for appending: $!\n";
close TEST;