9 lines
122 B
Perl
9 lines
122 B
Perl
#!/usr/bin/perl
|
|
|
|
binmode(STDOUT,":unix"); #requires PerlIO
|
|
for (0..9) {
|
|
print "."; sleep 1;
|
|
}
|
|
print "\n";
|
|
|
|
|