程嶏清单6-13.txt

来自「< linux网络编程工具>>配套源码」· 文本 代码 · 共 8 行

 $line = <STDIN>;
 $count = 1;
 while ($count <= 3) { 
    print ($line);
    $line = <STDIN>;
    $count++;
 }