Windows控制台下"^"字符问题

wxgiter

perl菜鸟一名
写了一个小脚本，用来查找特定目录下匹配特定正则的文本文件。
目录名和正则表达式通过命令行参数获得，例如"perl find.pl C:\ parse"就是查找C盘下面含有parse的文本文件。

现在有个问题，如果我的正则表达式是个集合[^a-z]，脚本实际获得的会是[a-z]，"^"号被忽略了。
有人碰到过这个问题吗？

zhlong8

windows 下文件不区分大小写吧，另外 [^a-z] 是 [a-z] 的补集， [] 里面第一个字符是 ^ 是补集的意思

freeand

改为：
[^^a-z]

与perl没关吧。

wxgiter

感谢回答！
我的描述太罗嗦，简化代码如下：

1. #!C:\Perl\bin\perl.exe -w
   
2. 
   
3. use strict;
   
4. 
   
5. my $string = $ARGV[0];
   
6. print "Your input is: *$string*\n";

复制代码

测试如下：

1. D:\Perl>perl chinaunix.pl ^abc123
   
2. Your input is: *abc123*
   
3. 
   
4. D:\Perl>perl chinaunix.pl abc^123
   
5. Your input is: *abc123*
   
6. 
   
7. D:\Perl>perl chinaunix.pl abc123^
   
8. More? 456
   
9. Your input is: *abc123456*
   
10. 
    
11. D:\Perl>perl chinaunix.pl ^^abc123
    
12. Your input is: *^abc123*
    
13. 
    
14. D:\Perl>perl chinaunix.pl abc^^123
    
15. Your input is: *abc^123*
    
16. 
    
17. D:\Perl>perl chinaunix.pl abc123^^
    
18. Your input is: *abc123^*
    
19. 
    
20. D:\Perl>

复制代码

原来连续输入两个"^"会被解析成一个"^"。

wxgiter

我回复时明明没有3L的