open (FILENAME,">", $add3); or die "Can't open $add3 $!";