Inter_B.txt的内容:
1|FFFFFFFFFFFFFFFF
2|FFFFFFFFFFFFFFFF
$i_B="Inter_B.txt";
open(FH3, "<$i_B");
while(
by xp20683 - Perl - 2009-03-31 17:33:48 阅读(1084) 回复(7)
1 213 2.2 123433, 123432, 235879,225558, 上面一行从文件读进来的时候,怎么用split把这些元素读成一个矩阵的元素,后面几个元素多了个逗号,不想要这个逗号, 上面的分割符号都是tab,结果想作为@array,有7个元素。split大致怎么写!实现不了的话,一般的正则怎么实现 谢谢,后面的几个元素都是6位整数。
split 能否按照如下规则分割文件: 将文件: A: dfsdf skfdjksd B: dskdjf dkfj C: dsjfkd sjdfk 如何使用命令将文件分成3个文件 A B C 并且文件名是A,B,C
大家好! 学习java,但简单一个程序遇到问题。非常奇怪! 我的test.txt文件内容如下: text.txt 111111111111 222222222,333333333 333333333333,44444444 55555555 4444444444444 code如下: BufferedReader in =new BufferedReader(new FileReader("test.txt")); String ss1=null; while((ss1=in.readLine())!=null){ System.out.println(ss1.length()); String [] words=ss1.split(",| "); ...
一个html文档包含HTTP协议头,以/\r?\n\r?\n/分割 ($header, $content) = split /\r?\n\r?\n/, $buffer; 问题是如果$buffer中除了协议头还有其他的\r\n\r\n,$content就会解析错误,有什么好的方案分割吗? 谢谢。
$str = "abc|1:=|1:=abc| my ($f1, $f2, $f3) = split /[^\\]\|/, $str; print "$f1 $f2 $f3\n"; 得到是 abc 1: 1:=ab 最后一个字符没了, 我如何让正则表达式里的[^\\]不被当做分割符号 [ 本帖最后由 belial_g 于 2009-3-22 12:29 编辑 ]
while (
#!/usr/bin/perl my ($date_old,$date_new); $date_old='20090314'; $date_new=join "-",split /(\d{4})(\d{2})(\d{2})/,$date_old; print $date_new;打印: -2009-03-14 #!/usr/bin/perl my ($date_old,$date_new); $date_old='2009 03 14'; $date_new=join "-",split /\s+/,$date_old; print $date_new;打印: 2009-03-14 我就是想把获得的日期的中间加上“-”,请问一下第一种为什么前面有一个“-”,谢谢。
sub GetStateOfLastFiveDuts { my ($goodbins)=@_; print $goodbins."\n"; @parts=split(",",$goodbins); $curr_y=0; @good_bins=(); foreach my $goodbin(@parts) { print $goodbin."\t"; } } 我的 $goodbins=1,2, 为什么print $goodbin."\t";却打印不出什么?明明应该是1 2