Parent Directory
|
Revision Log
tests
1 | wakaba | 1.1 | #!/usr/bin/perl |
2 | |||
3 | $| = 1; | ||
4 | print "Content-Type: application/x-dom-event-stream\n\n"; | ||
5 | |||
6 | for my $i (1..100) { | ||
7 | print "Event: test-event-1 | ||
8 | data: test-data-$i | ||
9 | |||
10 | "; | ||
11 | sleep 1; | ||
12 | } |
admin@suikawiki.org | ViewVC Help |
Powered by ViewVC 1.1.24 |