opendir DIR, $path

##</code><code>##

open THEFILE, "< $path/$file" or die "Can't open $path/$file: $!\n";