mason style

diff --git a/httemplate/misc/states.cgi b/httemplate/misc/states.cgi
index cf2b46e..02b7be4 100644 (file)
--- a/httemplate/misc/states.cgi
+++ b/httemplate/misc/states.cgi
@@ -1,7 +1,7 @@
-%
-%
-%  my $country = $cgi->param('arg');
-%  my @output = states_hash($country);
-%
-%
 [ <% join(', ', map { qq("$_") } @output) %> ]
+<%init>
+
+my $country = $cgi->param('arg');
+my @output = states_hash($country);
+
+</%init>