fix error w/current perl - can't call keys on a scalar hashref anymore, RT#77532

[freeside.git] / httemplate / misc / counties.cgi

[ <% join(', ', map { qq("$_") } @counties) %> ]
<%init>

my( $state, $country ) = $cgi->param('arg');
my @counties = counties($state, $country);

</%init>