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 130.
Unquoted string "martink" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "www" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "htdocs" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "snowflakes" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "cache" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "flakes" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "dat" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
String found where operator expected at /home/martink/www/htdocs/snowflakes/autohandler line 16, near "#line 1 ""
(Missing semicolon on previous line?)
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, near ") )"
Unmatched right curly bracket at /home/martink/www/htdocs/snowflakes/autohandler line 228, at end of line
(Might be a runaway multi-line '' string starting on line 227)
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 228, near "}"
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 139, near "}"
Unknown regexp modifier "/h" at /home/martink/www/htdocs/snowflakes/autohandler line 5, at end of line
Unknown regexp modifier "/e" at /home/martink/www/htdocs/snowflakes/autohandler line 5, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 16, near "#line 1 ""
Unknown regexp modifier "/r" at /home/martink/www/htdocs/snowflakes/autohandler line 16, 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: 
... 
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: 
... 
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;
... 
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>
135:  <br clear=both>
136:  </div>
137:  <%args>
138:  $cache
139:  </%args>
140:  </%method>
141: 
142:  <%method drawflake>
143:  % return if ! $flake && ! $blank;
... 
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>
... 
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 130.
Unquoted string "martink" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "www" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "htdocs" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "snowflakes" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "cache" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "flakes" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
Unquoted string "dat" may clash with future reserved word at /home/martink/www/htdocs/snowflakes/autohandler line 16.
String found where operator expected at /home/martink/www/htdocs/snowflakes/autohandler line 16, near "#line 1 ""
(Missing semicolon on previous line?)
syntax error at /etc/httpd/mason/mk/obj/2535643978/public/snowflakes/autohandler.obj line 1, near ") )"
Unmatched right curly bracket at /home/martink/www/htdocs/snowflakes/autohandler line 228, at end of line
  (Might be a runaway multi-line '' string starting on line 227)
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 228, near "}"
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 139, near "}"
Unknown regexp modifier "/h" at /home/martink/www/htdocs/snowflakes/autohandler line 5, at end of line
Unknown regexp modifier "/e" at /home/martink/www/htdocs/snowflakes/autohandler line 5, at end of line
syntax error at /home/martink/www/htdocs/snowflakes/autohandler line 16, near "#line 1 ""
Unknown regexp modifier "/r" at /home/martink/www/htdocs/snowflakes/autohandler line 16, 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(0x7f455e04b7d8)', '/home/martink/www/htdocs/snowflakes/autohandler', 'HTML::Mason::Exception::Compilation=HASH(0x7f4574738998)') called at /usr/local/share/perl5/5.32/HTML/Mason/Interp.pm line 450
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x7f455e04b7d8)', '/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(0x7f455e04b7d8)', '/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(0x7f455c0acfb8)') 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(0x7f4574739070)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f4574739070)') called at /usr/local/share/perl5/5.32/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f455c421c58)', 'Apache2::RequestRec=SCALAR(0x7f455dc0f128)') called at (eval 25) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f455dc0f128)') called at -e line 0
eval {...} at -e line 0