我有一个看起来像这样的输入文件
1a0i b.40.4.6 1a49 b.58.1.1 1a82 c.37.1.10 1atp d.144.1.7 . . . .
问题1
我将每一行放入@Array
当我使用
$Line = chomp($Array[0]);
print $Line;
在屏幕 1 中显示输出
but When I use
$Line = $Array[0];
print $Line;
在屏幕 1a0i b.40.4.6 中显示输出
为什么 chomp 会让 $Line 只剩下一个字符?
问题2
我想使用 b.40 作为 file_name ,所以这是我的代码
$Array[0] 是 1a0i b.40.4.6
$Line = $Array[0];
@Element = split(" ",$Line);
@Tiny_element = split(".",$Element[1]);
$File_name = join(".",splice(@Tiny_element,0,2));
但我打印 $File_name ,但它什么也没显示,我使用Dumper \@Tiny_element
,但它显示空 I print $Element[1]
,它显示 b.40.4.6 ,我用index($Element[1],".")
它显示 1 所以我知道它包含“。” 但它不能与“。”分开。
我试试split("\.",$Element[1])
;split('.',$Element[1])
之前,但它仍然没有解决......
它出什么问题了?
谢谢