templates/data/export.html.ep

   1 % layout 'default';
   2
   3 <ul>
   4 % foreach my $e ( @$export ) {
   5 %  my $path = $e; $path =~ s{^.+/public/export/}{};
   6 <li>
   7 <tt>
   8 <a target="<%= $path %>" href="/export/<%= $path %>"><%= $path %></a>
   9 </tt>
  10 <%= -s $e %> bytes
  11 %  if ( -e $e . '.png' ) {
  12 <br><img src="/export/<%= $path %>.png">
  13 %  } elsif ( $path =~ m/filter\./ ) {
  14 <a href="?import=<%= $path %>">import</a>
  15 %  }
  16 % }
  17 </ul>
  18
  19 <pre class=debug><%= dumper $export %></pre>