open (FH, "$file") || die "cant open file $!";