$NetBSD: patch-ce,v 1.2 2005/08/06 06:18:45 jlam Exp $

--- lib/File/Temp.pm.orig	2005-04-03 11:27:16.000000000 -0400
+++ lib/File/Temp.pm
@@ -2128,6 +2128,7 @@ The value is only relevant when C<safe_l
 
 {
   my $TopSystemUID = 10;
+  $TopSystemUID = 197108 if $^O eq 'interix'; # "Administrator"
   sub top_system_uid {
     my $self = shift;
     if (@_) {
