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 148.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 83.
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, next token ???
Unmatched right curly bracket at /home/martink/www/htdocs/snowflakes/autohandler line 114, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 114, near "}"
Unmatched right curly bracket at /home/martink/www/htdocs/snowflakes/autohandler line 112, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 112, near "}"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 139, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 149, 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"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 120, near "}"
/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) {
... 
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;
... 
135:  <br clear=both>
136:  </div>
137:  <%args>
138:  $cache
139:  </%args>
140:  </%method>
141: 
142:  <%method drawflake>
143:  % return if ! $flake && ! $blank;
144:  % my $class = $tight ? q{"flake tight"} : q{"flake"};
145:  % my ($code,$name,$gender) = @{$flake}{qw(code name gender)};
146:  % if(! $code) {
147:  <div class=<% $class %> style="width:<% $width %>px;">&nbsp;</div>
148:  % return;
149:  % }
150:  % my $arenh = $flake->{code} eq "autqzcws";
151:  % $label = "Arenh Jerrus\nof Bosmen" if $arenh && defined $label;
152:  % my $dir = $transparent ? "flakes.transparent" : "flakes";
153:  % $dir .= ".thumb" if $width <= 170;
... 
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 148.
"my" variable %ARGS masks earlier declaration in same scope at /home/martink/www/htdocs/snowflakes/autohandler line 83.
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, next token ???
Unmatched right curly bracket at /home/martink/www/htdocs/snowflakes/autohandler line 114, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 114, near "}"
Unmatched right curly bracket at /home/martink/www/htdocs/snowflakes/autohandler line 112, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 112, near "}"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 139, near "}"
Can't use global $^W in "my" at /home/martink/www/htdocs/snowflakes/autohandler line 149, 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"
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 120, near "}"
/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(0x7f45651e0c18)', '/home/martink/www/htdocs/snowflakes/autohandler', 'HTML::Mason::Exception::Compilation=HASH(0x7f44f06daa00)') called at /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm line 450
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x7f45651e0c18)', '/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(0x7f45651e0c18)', '/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(0x7f4560628fb8)') 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(0x7f44f06d5d58)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f44f06d5d58)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f4566983380)', 'Apache2::RequestRec=SCALAR(0x7f44f06dc370)') called at (eval 25) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f44f06dc370)') called at -e line 0
eval {...} at -e line 0