Changeset 4440 for trunk/Nebulous-Server/scripts/bench_test.pl
- Timestamp:
- Jun 29, 2005, 4:35:06 PM (21 years ago)
- File:
-
- 1 edited
-
trunk/Nebulous-Server/scripts/bench_test.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous-Server/scripts/bench_test.pl
r3014 r4440 7 7 8 8 use Benchmark qw( timethese ); 9 use PS::IPP::IData::Client;9 use Nebulous::Client; 10 10 11 my $ idata = PS::IPP::IData::Client->new(12 proxy => 'http://localhost:80/ idata'11 my $neb = Nebulous::Client->new( 12 proxy => 'http://localhost:80/nebulous' 13 13 ); 14 14 … … 18 18 { 19 19 'create/delete' => sub { 20 my $fh = $ idata->create( $key );20 my $fh = $neb->create( $key ); 21 21 close $fh; 22 $ idata->delete( $key );22 $neb->delete( $key ); 23 23 }, 24 24 }
Note:
See TracChangeset
for help on using the changeset viewer.
