From: fredrik <fredrik@959494ce-11ee-0310-bf91-de5d638817bd>
Date: Thu, 15 May 2008 18:20:21 +0000 (+0000)
Subject: Print matches asynchronously.
X-Git-Url: http://dolda2000.com/gitweb/?p=utils.git;a=commitdiff_plain;h=d865a9082a348e93d66f7a2f6e99f9407fcab6e4;hp=27366e7151d7e024586d85afee05ea638c151169

Print matches asynchronously.


git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/utils@1112 959494ce-11ee-0310-bf91-de5d638817bd
---

diff --git a/tel2name b/tel2name
index f9744bc..7e01302 100755
--- a/tel2name
+++ b/tel2name
@@ -95,6 +95,8 @@ match: while(<YP>) {
     for $prev (@matches) {
 	next match if $prev eq $_;
     }
+    print "$_\n";
+    flush;
     push @matches, $_;
 }
 match: while(<WP>) {
@@ -102,9 +104,7 @@ match: while(<WP>) {
     for $prev (@matches) {
 	next match if $prev eq $_;
     }
+    print "$_\n";
+    flush;
     push @matches, $_;
 }
-
-for $match (@matches) {
-    print "$match\n";
-}