Index: unk/Nebulous-Server/scripts/stest.pl
===================================================================
--- /trunk/Nebulous-Server/scripts/stest.pl	(revision 4928)
+++ 	(revision )
@@ -1,33 +1,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use lib "./lib";
-
-use Nebulous::Client; # trace => 'debug';
-
-my $neb = Nebulous::Client->new(
-    proxy   => 'http://localhost:80/nebulous'
-);
-
-my $fname = shift;
-
-#my $fh = $neb->create( $fname );
-#$neb->unlock( $fname, 'write' );
-
-$neb->create( $fname, 1 );
-#$neb->unlock( $fname, 'write' );
-$neb->delete( $fname );
-
-__END__
-
-{
-    my $fh = $pd->create( $key );
-    die "can't create file $fname" unless $fh;
-    print $fh "fooby\n";
-    close $fh;
-    #$neb->unlock( $fname, 'write' );
-    my $filesize =  (stat( $key ))[7];
-    print "created file $key, ${filesize}bytes\n";
-}
Index: unk/Nebulous/scripts/stest.pl
===================================================================
--- /trunk/Nebulous/scripts/stest.pl	(revision 4928)
+++ 	(revision )
@@ -1,33 +1,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use lib "./lib";
-
-use Nebulous::Client; # trace => 'debug';
-
-my $neb = Nebulous::Client->new(
-    proxy   => 'http://localhost:80/nebulous'
-);
-
-my $fname = shift;
-
-#my $fh = $neb->create( $fname );
-#$neb->unlock( $fname, 'write' );
-
-$neb->create( $fname, 1 );
-#$neb->unlock( $fname, 'write' );
-$neb->delete( $fname );
-
-__END__
-
-{
-    my $fh = $pd->create( $key );
-    die "can't create file $fname" unless $fh;
-    print $fh "fooby\n";
-    close $fh;
-    #$neb->unlock( $fname, 'write' );
-    my $filesize =  (stat( $key ))[7];
-    print "created file $key, ${filesize}bytes\n";
-}