open(HANDLE, $file) || die $!;