open (OUT, ">$outfile" ) or die "Cannot open $outfile :$!"

##</code><code>##

open (OUT, ">$outfile" ) or die "Cannot open $outfile :$!";