projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
29ec5bb
)
fixed typo in new file @ modnight code
author
minima
<minima>
Mon, 28 Aug 2000 17:03:32 +0000
(17:03 +0000)
committer
minima
<minima>
Mon, 28 Aug 2000 17:03:32 +0000
(17:03 +0000)
perl/watchdbg
patch
|
blob
|
history
diff --git
a/perl/watchdbg
b/perl/watchdbg
index ca3e2e3b03c134abcbd7ef6b46d0aa63f65864a3..fef5cdf7e8e1f54a081f3da530b2fcd08e32f71b 100755
(executable)
--- a/
perl/watchdbg
+++ b/
perl/watchdbg
@@
-51,7
+51,8
@@
for (;;) {
my @now = Julian::unixtoj(time());
if ($today[1] != $now[1]) {
$fp->close;
- for (my $i = 0; $i < 20; $i++) {
+ my $i;
+ for ($i = 0; $i < 20; $i++) {
last if $fh = $fp->open(@now);
sleep 5;
}