请教一个关于读取输入后操作的问题

dadastan

我写了一段：

1. open my $wrt, ">> match.lst";
   
2. while(<>)
   
3. {
   
4. chomp();
   
5. print $wrt $_;
   
6. }

复制代码

输入一些字符，然后ctrl-c之后，发现match.lst里面是空的
但是如果不是从键盘输入，例如：

1. open my $read, "filename.lst";
   
2. while(<$read>)
   
3. {
   
4. chomp();
   
5. print $wrt $_;
   
6. }

复制代码

这样又可以
这是怎么回事？

刚试了，将print $wrt $_; 换成print $wrt "$_";就可以了
但是是为什么呢？

cdtits

输入没有回车换行么？

Monox

回复 1# dadastan


    Ctrl-C 表示终断程序运行，你应该按 Ctrl-D (Linux 下) 或者 Ctrl-Z (Windows 下)

dadastan

回复 3# Monox


    貌似不是这个，我刚刚试了下
如果把
print $wrt $_;
换成
print $wrt "$_";
就可以了，但是这是为什么呢？

Monox

回复 4# dadastan

你确定是这样子吗？你可以把你真实用到的脚本内容以及运行过程帖出来吗？
   

xmchenb

open my $wrt, "+> d:/cc/cc.txt";
while(<>)
{
chomp();
print $wrt $_;
}

cdtits

真心没有搞明白 LZ 遇到啥问题了？

xmchenb

楼上说的对，我也认为他的程序没有问题