open(FILE,$filename) || die "Can't open '$filename': $!";