#!/usr/bin/perl -Tw
#
-# $Id: signup.cgi,v 1.42 2003-07-04 03:12:21 ivan Exp $
+# $Id: signup.cgi,v 1.44 2003-09-29 06:22:18 ivan Exp $
use strict;
use vars qw( @payby $cgi $locales $packages
END
if ( $init_popstate ) {
- $text .='<INPUT TYPE="hidden" NAME="init_popstate" VALUE="$init_popstate">';
+ $text .= '<INPUT TYPE="hidden" NAME="init_popstate" VALUE="'.
+ $init_popstate. '">';
} else {
$text .= <<END;
function acstate_changed(what) {
my ( $selected_county, $selected_state, $selected_country,
$prefix, $onchange ) = @_;
- my $prefix = '' unless defined $prefix;
+ $prefix = '' unless defined $prefix;
my $countyflag = 0;