From de48f4e69aef2efba652b10994a920d6a61e856d Mon Sep 17 00:00:00 2001
From: groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>
Date: Wed, 3 Oct 2007 21:04:04 +0000
Subject: optimizations are fun! widget cache, reflector and immutable, other
 details. bye old view

---
 t/bench.pl | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 t/bench.pl

(limited to 't')

diff --git a/t/bench.pl b/t/bench.pl
new file mode 100644
index 0000000..d550360
--- /dev/null
+++ b/t/bench.pl
@@ -0,0 +1,23 @@
+use strict;
+use warnings;
+use Test::More tests => 2;
+
+BEGIN { use_ok 'Catalyst::Test', 'ComponentUI' }
+
+
+my $i = 1;
+for(30..60){
+  ok( request('/')->is_success, 'Request should succeed' );
+  ok( request('/testmodel/foo')->is_success, 'Request should succeed' );
+  ok( request('/testmodel/baz')->is_success, 'Request should succeed' );
+  ok( request("/testmodel/foo/id/${_}/update")->is_success, 'Request should succeed' );
+  ok( request("/testmodel/foo/id/${_}/view")->is_success, 'Request should succeed' );
+
+  $i = 1 if $i > 4;
+  ok( request("/testmodel/baz/id/${i}/update")->is_success, 'Request should succeed' );
+  ok( request("/testmodel/baz/id/${i}/view")->is_success, 'Request should succeed' );
+  $i++;
+}
+
+
+
-- 
cgit v1.2.3-54-g00ecf