Index: Dumpfile.pm
===================================================================
--- Dumpfile.pm	(revision 272)
+++ Dumpfile.pm	(working copy)
@@ -745,9 +745,21 @@
         print $fh "Text-content-length: $textlen\n";
     }
 
-    print $fh "Content-length: " . ($proplen + $textlen)
-        . "\n\n$propout$text\n";
+    # If you have large files in your source safe repository, writing the 
+    # files out in one go will fail.
+    # Split the text into smaller blocks that can be saved in one go.  
+    print $fh "Content-length: " . ($proplen + $textlen);
+    print $fh  "\n\n$propout";
 
+    my $BLOCKSIZE = 100000;
+    
+    for (my $i=0; $i< $textlen; $i += $BLOCKSIZE)
+    {
+        my $subText = substr $text, $i, $BLOCKSIZE;
+        print $fh $subText;
+    }
+    print $fh "\n";
+
 }  #  End output_content
 
 ###############################################################################