open my $fh, "<", "$file" or die "Cannot open file $file: $!";