4 % foreach my $depends ( keys %$snippets ) {
5 <h2><%= $depends %></h2>
7 % foreach my $desc ( keys %{ $snippets->{$depends} } ) {
9 <form method=post action=/data/items>
10 <input type=submit name=test value="Load and test">
11 % my $path = "code/$depends.$desc.pl";
12 <a target=code href="/<%= $path %>"><%= $desc %></a>
13 <input type=hidden name=code_depends value="<%= $depends %>">
14 <input type=hidden name=code_description value="<%= $desc %>">
16 % my $code = $snippets->{$depends}->{$desc};
17 % my $rows = scalar split(/\n/,$code);
18 <textarea name=code rows=<%= $rows %> style="overflow:hidden; width: 100%">
28 % if ( param('all_code') ) {
29 <input type=hidden name=all_code value=0>
30 <input type=submit value="Show just dependent code snippets">
32 <input type=submit name=all_code value="Show all code snippets">
36 <tt class=debug><%= dumper stash('snippets') %></tt>