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 240.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 130.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 122.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 83.
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 "}"
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 9, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 228, near "}"
(Might be a runaway multi-line '' string starting on line 227)
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 241, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 120, near "}"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 112, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 123, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 77, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 84, near "local $^W"
/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);
... 
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 &>
82: 
83:  <& SELF:masthead, cache=>$cache &>
84: 
85:  <p>Somewhere in the world, it's snowing. But you don't need to go far&mdash;it's always snowing on this page. Explore <a href="random.mhtml">random flurries</a>, <a href="families.mhtml">snowflake families</a> and <a href="flake.mhtml?flake=autqzcws">individual flakes</a>. There are many <a href="oddities.mhtml">unusual snowflakes</a> and snowflake <a href="families.mhtml?family=12">family 12</a> and <a href="families.mhtml?family=46">family 46</a> are very interesting.
86: 
87:  <p>But don't settle for only pixel snowflakes&mdash;<a href="snowflake.3dprint.mhtml?name=morptel">make an STL file and 3D print your own flakes</a>!
88: 
... 
108:  % if ($text) {
109:  &l<%$prefix%>quo;<% $text %>&r<%$prefix%>quo;
110:  % }
111:  <%args>
112:  $text=>undef
113:  $double=>undef
114:  </%args>
115:  </%method>
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" &>
132:  % }
133:  </div>
134:  <div class=legend><img src="img/legend.png"></div>
... 
224:  % } else {
225:  <& SELF:image, file=>"img/$p->{file}.png", width=>$width, caption=>$caption, float=>$float, style=>$style||"margin-right:5px;", zoom=>1, alt=>$m->scomp("SELF:alt") &>
226:  % }
227:  <%args>
228:  $link => undef
229:  $i => undef
230:  $width => undef
231:  $style => undef
232:  </%args>
... 
236:  inherit=>"autohandler.project"
237:  </%flags>
238: 
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 240.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 130.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 122.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 83.
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 "}"
Unmatched right curly bracket at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 9, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 228, near "}"
  (Might be a runaway multi-line '' string starting on line 227)
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 241, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 120, near "}"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 112, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 123, near "local $^W"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 77, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 84, near "local $^W"
/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(0x7f45801a8fc8)', '/home/martink/www/htdocs/snowflakes/autohandler', 'HTML::Mason::Exception::Compilation=HASH(0x7f456c00c470)') called at /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm line 450
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x7f45801a8fc8)', '/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(0x7f45801a8fc8)', '/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(0x7f456c2d0460)') 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(0x7f456c16d988)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f456c16d988)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f45801dac98)', 'Apache2::RequestRec=SCALAR(0x7f456c0496e8)') called at (eval 25) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f456c0496e8)') called at -e line 0
eval {...} at -e line 0