CGI::Ex 2.00

[chaz/p5-CGI-Ex] / samples / perl2.pl

diff --git a/samples/perl2.pl b/samples/perl2.pl
new file mode 100644 (file)
index 0000000..2a45fea
--- /dev/null
+++ b/samples/perl2.pl
@@ -0,0 +1,17 @@
+[
+   {
+     'group validate_if' => 'foo',
+     bar => {
+       required => 1,
+     },
+   },
+   {
+     'group validate_if' => 'hem',
+     haw => { required => 1 },
+   },
+   {
+     raspberry => {
+       required => 1,
+     },
+   },
+];