open(FILE,$filename) || die $!;