diff --git a/scripts/net-test b/scripts/net-test index 0bfbcf5..2b3d9d8 100755 --- a/scripts/net-test +++ b/scripts/net-test @@ -34,12 +34,12 @@ while(true) { STDOUT->flush(); $s = ""; - $command = $s2 . "\necho MAGIC\n"; + $command = $s2 . "\necho -e \"\\v\"\n"; print $in $command; inner_while: while (true) { $line = <$out>; - if ($line eq "MAGIC\n") { + if ($line =~ s/\cK//) { STDOUT->flush(); last inner_while; }