作者bor1228 (笨蛋...)
看板Perl
标题[问题] 请教关於split及reg问题
时间Wed Mar 23 23:21:00 2016
内容如下:
$row=Head(0) Site(1) (X,Y)=(-7,20)
想把它用空白分割成三等份，但是用了
my($hd,$st,$ad)= split(' ',$row) 或者是把' '改成 => /\sOB+/ 都没办法成功
请问高手点解啦~~
P.S 如果想使用regular expression 把他表示 得出$1=0 ,$2=1 ,$3=(X,Y)=(-7,20)
Head内容 ^ ^Site内容
这样又要如何写呢?
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 59.126.20.75
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Perl/M.1458746462.A.973.html
※ 编辑: bor1228 (59.126.20.75), 03/23/2016 23:31:39
1F：推 MistQ: my $str='$row=Head(0) Site(1) (X,Y)=(-7,20)'; 03/24 01:09
2F：→ MistQ: $str=~/Head\((.*)\) Site\((.*)\) (.*)/g; 03/24 01:09
3F：→ MistQ: print "\$1=$1, \$=$2, \$3=$3"; 03/24 01:10
4F：→ Neisseria: 如果只有这一行，用 regex 硬做无妨 03/24 08:39
5F：→ Neisseria: 要不然，这麽复杂的字串，建议写 parser 去处理 03/24 08:40
6F：推 loyuchu1539: 那请问有办法用split 切空白吗？ 03/24 11:26
7F：推 abliou: split" ",$STR 这样就切空白了阿 03/24 12:35