local *FH; open(FH, ">> $file") or die "Cannot append to $file: $!";