Index: trunk/Nebulous-Server/scripts/bench_test.pl
===================================================================
--- trunk/Nebulous-Server/scripts/bench_test.pl	(revision 4879)
+++ trunk/Nebulous-Server/scripts/bench_test.pl	(revision 4931)
@@ -1,6 +1,6 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
-use warnings;
+use warnings FATAL => qw( all );
 
 use lib "./lib";
@@ -14,12 +14,27 @@
 
 my $key = shift || 'foobar';
-            my $fh = $neb->create( $key );
-            close $fh;
+
+eval { $neb->delete( $key ); };
+
+my $fh = $neb->create( $key );
+close $fh;
+
+
+timethese( -3,
+    {
+        'stat' => sub {
+            $neb->stat( $key );
+        },
+    }
+);
+
+$neb->delete( $key );
 
 timethese( -3,
     {
         'create/delete' => sub {
-#            $neb->delete( $key );
-            $neb->stat( $key );
+            my $fh = $neb->create( $key );
+            close $fh;
+            $neb->delete( $key );
         },
     }