System error

error:  Error during compilation of /home/henry/maztrave2/www/perl/will/will:
Can't modify constant item in scalar assignment at /home/henry/maztrave2/www/perl/will/will line 9, near ");"
(Might be a runaway multi-line '' string starting on line 1)

context: 
... 
5:  use Carp;
6: 
7:  my $location_of_will_master = ".";
8: 
9:  %::p = (); # Global hash to collect relevant parse data
10: 
11:  my $grammer =
12:  q{
13:  will : comment | blank | parameter | specific_bequest | <error>
... 
code stack:  /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm:445
/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm:246
/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm:211
/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm:97
/usr/local/lib/perl5/site_perl/5.8.8/Class/Container.pm:275
/usr/local/lib/perl5/site_perl/5.8.8/Class/Container.pm:353
/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm:348
/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm:868
/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm:822
/home/henry/maztrave2/www/cgi-bin/mason_handler2.pl:195
-e:0
raw error






























Error during compilation of /home/henry/maztrave2/www/perl/will/will:
Can't modify constant item in scalar assignment at /home/henry/maztrave2/www/perl/will/will line 9, near ");"
  (Might be a runaway multi-line '' string starting on line 1)



Trace begun at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm line 845
HTML::Mason::Interp::_compilation_error('HTML::Mason::Interp=HASH(0xa891fa4)', '/home/henry/maztrave2/www/perl/will/will', 'Error during compilation of :^JCan\'t modify constant item in scalar assignment at /home/henry/maztrave2/www/perl/will/will line 9, near ");"^J  (Might be a runaway multi-line \'\' string starting on line 1)^J^J^JStack:^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm:441]^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm:246]^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm:211]^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm:97]^J  [/usr/local/lib/perl5/site_perl/5.8.8/Class/Container.pm:275]^J  [/usr/local/lib/perl5/site_perl/5.8.8/Class/Container.pm:353]^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm:348]^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm:868]^J  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm:822]^J  [/home/henry/maztrave2/www/cgi-bin/mason_handler2.pl:195]^J  [-e:0]^J') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm line 445
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0xa891fa4)', '/perl/will/will') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 246
eval {...} at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 231
HTML::Mason::Request::_initialize('HTML::Mason::Request::ApacheHandler=HASH(0xb70eda0)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 211
HTML::Mason::Request::new('HTML::Mason::Request::ApacheHandler', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0xa891fa4)', 'comp', '/perl/will/will', 'args', 'ARRAY(0xb3d2908)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'apache_req', 'Apache2::Request=SCALAR(0xb687474)', 'container', 'HASH(0xa89f238)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 97
HTML::Mason::Request::ApacheHandler::new('HTML::Mason::Request::ApacheHandler', 'error_mode', 'output', 'error_format', 'html', 'interp', 'HTML::Mason::Interp=HASH(0xa891fa4)', 'comp', '/perl/will/will', 'args', 'ARRAY(0xb3d2908)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'apache_req', 'Apache2::Request=SCALAR(0xb687474)', 'container', 'HASH(0xa89f238)') called at /usr/local/lib/perl5/site_perl/5.8.8/Class/Container.pm line 275
Class::Container::call_method('HTML::Mason::Interp=HASH(0xa891fa4)', 'request', 'new', 'interp', 'HTML::Mason::Interp=HASH(0xa891fa4)', 'comp', '/perl/will/will', 'args', 'ARRAY(0xb3d2908)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'apache_req', 'Apache2::Request=SCALAR(0xb687474)', 'container', 'HASH(0xa89f238)') called at /usr/local/lib/perl5/site_perl/5.8.8/Class/Container.pm line 353
Class::Container::create_delayed_object('interp', 'HTML::Mason::Interp=HASH(0xa891fa4)', 'comp', '/perl/will/will', 'args', 'ARRAY(0xb3d2908)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'apache_req', 'Apache2::Request=SCALAR(0xb687474)', 'container', 'HASH(0xa89f238)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm line 348
HTML::Mason::Interp::make_request('HTML::Mason::Interp=HASH(0xa891fa4)', 'comp', '/perl/will/will', 'args', 'ARRAY(0xb3d2908)', 'ah', 'HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'apache_req', 'Apache2::Request=SCALAR(0xb687474)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 868
eval {...} at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 867
HTML::Mason::ApacheHandler::prepare_request('HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'Apache2::Request=SCALAR(0xb687474)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 822
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xa88cd44)', 'Apache2::Request=SCALAR(0xb687474)') called at /home/henry/maztrave2/www/cgi-bin/mason_handler2.pl line 195
Mason::Handler2::handler('Apache2::RequestRec=SCALAR(0xb3f663c)') called at -e line 0
eval {...} at -e line 0