$path=~s/\//\\/g;

##</code><code>##

open(FH,"$path/$file") or die $!;