use strict; 
use warnings;

##</code><code>##

my $xml = "e:\cars\input.xml";

##</code><code>##

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