open(FILE,"$html_dir/$FigFile/$DirFile") or die $!;
while (<FILE>){
...
}
close(FILE)