if( keys %old > $oldsize ) # only write if new ips added
  {
  open my $out, '>', $awsLists or die "$! opening $awsLists";
##print directly to the file the new keys difference
  print $out sort keys %old; # sort not needed, but nice touch :)
  close $out;
  }