ope my $fh,'<',$file or die "can't open file: $!";