System error

error:  Error during compilation of /home/martink/www/htdocs/snowflakes/autohandler:
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 126.
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, at end of line
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, near ""9-snowflake-simulation-martin-krzywinski.html"}"
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 14, at end of line
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 17, at end of line
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 17, near "}"
Can't use global $^W in "my" at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 24, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 120, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 127, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 77, near "}"
Unknown regexp modifier "/h" at /home/martink/www/htdocs/snowflakes/autohandler line 5, at end of line
/home/martink/www/htdocs/snowflakes/autohandler has too many errors.
context: 
1: 
2:  <%init>
3: 
4:  my $ip = $ENV{REMOTE_ADDR};
5:  if($ip =~ /^35[.]192[.]61) {
6:  $m->clear_buffer;
7:  $m->abort(403);
8:  }
9: 
10:  use Data::Dumper;
11:  use Storable;
12:  use Number::Format qw(format_number);
13:  use Time::HiRes qw(gettimeofday);
14: 
15:  my $t0 = [gettimeofday];
16:  my $cache_file = "/home/martink/www/htdocs/snowflakes/cache/flakes.dat";
17:  my $cache = retrieve($cache_file);
18: 
19:  </%init>
20: 
21:  <%method posters>
22:  <%perl>
23:  my $posters = {
24:  1=>{caption=>"Daytime snowflakes", file=>"snowflakes.10000.01", faa=>"snowflake-simulation-martin-krzywinski.html"},
25:  2=>{caption=>"Nighttime snowflakes", file=>"snowflakes.10000.02", faa=>"1-snowflake-simulation-martin-krzywinski.html"},
26: 
27:  3=>{caption=>"16 boy snowflakes", file=>"snowflakes.boys", faa=>"8-snowflake-simulation-martin-krzywinski.html"},
28:  "3b"=>{caption=>"16 boy snowflakes", file=>"snowflakes.boys.black", faa=>"6-snowflake-simulation-martin-krzywinski.html"},
... 
73:  </p>
74:  </div>
75:  </%method>
76: 
77:  <& /note.mhtml, key=>"snowflakes" &>
78: 
79:  <h1>It's Snowing in my CPU &mdash; a Snowflake catalogue</h1>
80: 
81:  <& SELF:leadingquote &>
... 
116: 
117:  <%method alt>
118:  % return "Gravner-Griffeath Snowflake Simulation by Martin Krzywinski and Jake Lever";
119:  </%method>
120: 
121:  <%method masthead>
122:  % my $n = 7;
123:  % my @codes = (sort { rand() <=> rand() } $m->comp("oddities.mhtml:oddflakes"))[0..$n-1];
124:  % my @idx = map { $cache->{by}{code}{$_} } @codes;
125:  % my @flakes = map { $cache->{flakes}[$_] } @idx;
126:  <div class=masthead>
127: 
128:  <p>Go ahead, meet some snowflakes.</p>
129:  <div class=vmar4>
130:  % for my $flake (@flakes) {
131:  <& SELF:drawflake, flake=>$flake, label=>sprintf("%s",$flake->{name}), width=>125, suffix=>"tf" &>
... 
code stack:  /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm:450
/usr/local/share/perl5/5.32/HTML/Mason/Interp.pm:773
/usr/local/share/perl5/5.32/HTML/Mason/Component.pm:333
/usr/local/share/perl5/5.32/HTML/Mason/Request.pm:440
raw error






























Error during compilation of /home/martink/www/htdocs/snowflakes/autohandler:
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 126.
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, at end of line
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, near ""9-snowflake-simulation-martin-krzywinski.html"}"
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 14, at end of line
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 17, at end of line
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 17, near "}"
Can't use global $^W in "my" at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 24, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 120, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 127, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 77, near "}"
Unknown regexp modifier "/h" at /home/martink/www/htdocs/snowflakes/autohandler line 5, at end of line
/home/martink/www/htdocs/snowflakes/autohandler has too many errors.


Trace begun at /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm line 851
HTML::Mason::Interp::_compilation_error('HTML::Mason::Interp=HASH(0x7f45646fe748)', '/home/martink/www/htdocs/snowflakes/autohandler', 'HTML::Mason::Exception::Compilation=HASH(0x7f4578e7ba08)') called at /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm line 450
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x7f45646fe748)', '/snowflakes/autohandler') called at /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm line 773
HTML::Mason::Interp::find_comp_upwards('HTML::Mason::Interp=HASH(0x7f45646fe748)', '/snowflakes', 'autohandler') called at /usr/local/share/perl5/5.32/HTML/Mason/Component.pm line 333
HTML::Mason::Component::parent('HTML::Mason::Component::FileBased=HASH(0x7f45649f9ad8)') called at /usr/local/share/perl5/5.32/HTML/Mason/Request.pm line 440
eval {...} at /usr/local/share/perl5/5.32/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f4578d6f350)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f4578d6f350)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f45649f7a00)', 'Apache2::RequestRec=SCALAR(0x7f4578dd67e0)') called at (eval 25) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f4578dd67e0)') called at -e line 0
eval {...} at -e line 0