2 % my $path = session('path');
4 <h2>Select data file to load</h2>
6 <form method=post action=/data/load >
8 <input type=submit value="Load">
11 <tr><th rowspan=2>name</th><th colspan=2>size</th><th rowspan=2>items</th><th rowspan=2>changes</th><th rowspan=2 title="loaded in memory">m</th><th colspan=2>columns</th></tr>
12 <tr><th>disk</th><th>storable</th></tr>
13 % foreach my $n ( @$files ) {
16 <input name=path type=radio value="<%= $n %>" <%= $n eq $path && defined $loaded->{$path}->{data} ? 'disabled' : '' %>>
19 </td><td class=bytes><%= $size->{$n} %>
21 % if ( my $size = -s $dump_path->{$n} ) {
22 <a title="remove" href="/data/unlink?path=<%= $dump_path->{$n} %>"><%= $size %></a>
24 </td><td align=right><%= defined $loaded->{$n}->{data} ? $#{ $loaded->{$n}->{data}->{items} } + 1 : '' %>
25 </td><td align=right><%= defined $changes->{$n} ? $#{ $changes->{$n} } + 1 : '' %>
26 </td><td><input name=paths type=checkbox value="<%= $n %>" <%= defined $loaded->{$n}->{stats} ? 'checked' : '' %>>
28 % if ( defined $loaded->{$n}->{columns} ) {
29 % my $visible = { map { $_ => 1 } @{ $loaded->{$n}->{columns} } };
30 % foreach my $n ( @{ $loaded->{$n}->{header} } ) {
31 <span class="c<%= $filters->{$n} ? ' f' : '' %><%= ! $visible->{$n} ? ' h' : '' %>"><%= $n %></span>
38 <input type=submit value="Load">
42 %#<pre class=debug><%= dumper $changes %></pre>
43 <pre class=debug><%= dumper $loaded %></pre>
44 <pre class=debug><%= dumper $filters %></pre>
45 <pre class=debug><%= dumper $dump_path %></pre>