File: test.pl

package info (click to toggle)
log2mail 0.3.0-2.1
  • links: PTS
  • area: main
  • in suites: lenny, squeeze
  • size: 428 kB
  • ctags: 175
  • sloc: cpp: 1,172; sh: 857; perl: 16; makefile: 15
file content (8 lines) | stat: -rwxr-xr-x 125 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
#!/usr/bin/perl -w

for ($i=1;$i<10000;$i++) {
    open(MYF, ">>logf");
    print MYF "hlo\n";
    close MYF;
    sleep 1;
}