System error

error:

Error during compilation of /var/www/html/freeside/edit/process/quick-charge.cgi:
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 126, near ")
( "
Global symbol "$amount" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 132.
Global symbol "$setup_cost" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 133.
Global symbol "$quantity" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 134.
Global symbol "$override" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 147.
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 1, near "if"
Global symbol "$error" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 1.
Global symbol "$error" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 2.
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 4, near "}"
(Might be a runaway multi-line '' string starting on line 3)
Global symbol "$message" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 5.
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 10, near "}"
(Might be a runaway multi-line '' string starting on line 5)
/var/www/html/freeside/edit/process/quick-charge.cgi has too many errors.

context:

1:	% if ( $error ) {
2:	% $cgi->param('error', $error );
3:	<% $cgi->redirect($p.'quick-charge.html?'. $cgi->query_string) %>
4:	% } else {
5:	<% header(emt($message)) %>
6:	<SCRIPT TYPE="text/javascript">
7:	window.top.location.reload();
8:	</SCRIPT>
9:	</BODY></HTML>
10:	% }
11:	<%init>
12:
13:	my $curuser = $FS::CurrentUser::CurrentUser;
14:	die "access denied"
...
122:
123:	if ( $param->{'taxclass'} eq '(select)' ) {
124:	$error .= "Must select a tax class. "
125:	unless ($conf->config('tax_data_vendor'))
126:	( $override \|\| $param->{taxproductnum} )
127:	);
128:	$cgi->param('taxclass', '');
129:	}
130:
131:	my %charge = (
132:	'amount' => $amount,
133:	'setup_cost' => $setup_cost,
134:	'quantity' => $quantity,
135:	'bill_now' => scalar($cgi->param('bill_now')),
136:	'invoice_terms' => scalar($cgi->param('invoice_terms')),
137:	'start_date' => ( scalar($cgi->param('start_date'))
138:	? parse_datetime($cgi->param('start_date'))
...
143:	'pkg' => scalar($cgi->param('pkg')),
144:	'setuptax' => scalar($cgi->param('setuptax')),
145:	'taxclass' => scalar($cgi->param('taxclass')),
146:	'taxproductnum' => scalar($cgi->param('taxproductnum')),
147:	'tax_override' => $override,
148:	'classnum' => scalar($cgi->param('classnum')),
149:	'additional' => \@description,
150:	);
151:
...

code stack:

/usr/share/perl5/HTML/Mason/Interp.pm:453
/usr/share/perl5/HTML/Mason/Request.pm:252
/usr/share/perl5/HTML/Mason/Request.pm:215
/usr/share/perl5/HTML/Mason/ApacheHandler.pm:94
/usr/local/share/perl/5.20.2/FS/Mason/Request.pm:37
/usr/share/perl5/Class/Container.pm:275
/usr/share/perl5/Class/Container.pm:353
/usr/share/perl5/HTML/Mason/Interp.pm:351
/usr/share/perl5/HTML/Mason/ApacheHandler.pm:874
/usr/share/perl5/HTML/Mason/ApacheHandler.pm:828
/usr/local/etc/freeside/handler.pl:144
-e:0

raw error

Error during compilation of /var/www/html/freeside/edit/process/quick-charge.cgi:
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 126, near ")
               ( "
Global symbol "$amount" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 132.
Global symbol "$setup_cost" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 133.
Global symbol "$quantity" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 134.
Global symbol "$override" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 147.
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 1, near "if"
Global symbol "$error" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 1.
Global symbol "$error" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 2.
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 4, near "}"
  (Might be a runaway multi-line '' string starting on line 3)
Global symbol "$message" requires explicit package name at /var/www/html/freeside/edit/process/quick-charge.cgi line 5.
syntax error at /var/www/html/freeside/edit/process/quick-charge.cgi line 10, near "}"
  (Might be a runaway multi-line '' string starting on line 5)
/var/www/html/freeside/edit/process/quick-charge.cgi has too many errors.


Trace begun at /usr/share/perl5/HTML/Mason/Interp.pm line 854
HTML::Mason::Interp::_compilation_error('HTML::Mason::Interp=HASH(0x7fbd843931b8)', '/var/www/html/freeside/edit/process/quick-charge.cgi', 'HTML::Mason::Exception::Compilation=HASH(0x7fbd8b2466a0)') called at /usr/share/perl5/HTML/Mason/Interp.pm line 453
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x7fbd843931b8)', '/edit/process/quick-charge.cgi') called at /usr/share/perl5/HTML/Mason/Request.pm line 252
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 235
HTML::Mason::Request::_initialize('FS::Mason::Request=HASH(0x7fbd8af54d08)') called at /usr/share/perl5/HTML/Mason/Request.pm line 215
HTML::Mason::Request::new('FS::Mason::Request', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'comp', '/edit/process/quick-charge.cgi', 'args', 'ARRAY(0x7fbd8ba9b970)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)', 'container', 'HASH(0x7fbd8ba9c9b8)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 94
HTML::Mason::Request::ApacheHandler::new('FS::Mason::Request', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'comp', '/edit/process/quick-charge.cgi', 'args', 'ARRAY(0x7fbd8ba9b970)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)', 'container', 'HASH(0x7fbd8ba9c9b8)') called at /usr/local/share/perl/5.20.2/FS/Mason/Request.pm line 37
FS::Mason::Request::new('FS::Mason::Request', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'comp', '/edit/process/quick-charge.cgi', 'args', 'ARRAY(0x7fbd8ba9b970)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)', 'container', 'HASH(0x7fbd8ba9c9b8)') called at /usr/share/perl5/Class/Container.pm line 275
Class::Container::call_method('HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'request', 'new', 'interp', 'HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'comp', '/edit/process/quick-charge.cgi', 'args', 'ARRAY(0x7fbd8ba9b970)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)', 'container', 'HASH(0x7fbd8ba9c9b8)') called at /usr/share/perl5/Class/Container.pm line 353
Class::Container::create_delayed_object('interp', 'HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'comp', '/edit/process/quick-charge.cgi', 'args', 'ARRAY(0x7fbd8ba9b970)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)', 'container', 'HASH(0x7fbd8ba9c9b8)') called at /usr/share/perl5/HTML/Mason/Interp.pm line 351
HTML::Mason::Interp::make_request('HTML::Mason::Interp=HASH(0x7fbd843931b8)', 'comp', '/edit/process/quick-charge.cgi', 'args', 'ARRAY(0x7fbd8ba9b970)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'apache_req', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 874
eval {...} at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 873
HTML::Mason::ApacheHandler::prepare_request('HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 828
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7fbd843be610)', 'Apache2::RequestRec=SCALAR(0x7fbd8b414c40)') called at /usr/local/etc/freeside/handler.pl line 144
eval {...} at /usr/local/etc/freeside/handler.pl line 144
HTML::Mason::handler('Apache2::RequestRec=SCALAR(0x7fbd8b414c40)') called at -e line 0
eval {...} at -e line 0