open (FILE, ">>$filename") or die "trying";