Find file
Fetching contributors…
Cannot retrieve contributors at this time
executable file 10 lines (8 sloc) 418 Bytes
#!/usr/bin/perl
print "<html><body><ol>";
$i = 0;
while ($i < 100)
{
print "<li>$i: SmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmoo SmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmooSmoo</li>\n";
$i++;
}