my $filename="$mydir/file_detail.txt"; open (FILE, "<", $filename);