File: busy.html

package info (click to toggle)
libhtml-mason-perl 1%3A1.56-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 1,768 kB
  • ctags: 663
  • sloc: perl: 8,602; sh: 49; makefile: 2
file content (18 lines) | stat: -rw-r--r-- 299 bytes parent folder | download | duplicates (10)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
%# -*- perl -*-

<& lib/hourglass.mhtml, op => "show" &>

% for my $i (1..5) {
<p> (<%$i%>) This is some content that takes a while to produce </p>
%  sleep(1);
% }

<& lib/hourglass.mhtml, op => "hide" &>

</body>
</html>

<%attr>
title => "Hourglass demonstration"
requires_mod_perl => 1
</%attr>