看板
[ Perl ]
討論串[問題] 用RegExp將字串切割
共 5 篇文章
內容預覽:
我有一列字串. $str = "|%some string 1\n|%some string 2\n|%...\n|%some string n". 也就是這裡頭可拆成 n 個以 |% 開頭的字串. 想把這字串切成陣列. 我這麼寫 @_ = ($str =~ m/|%.*?[^|][^%]/gs);
(還有54個字)
內容預覽:
再承續這個問題. 有沒有辦法像切吐司一樣. 一次切一段出來用. 第一次: $tmp = "|%some string1\n";. $str = "|%some string2\n|%...\n|%some string n";. 第一次: $tmp = "|%some string2\n";. $s
(還有478個字)
內容預覽:
my.pl. #!/usr/bin/perl. #By ksc91u, welcome to use the code but keep this line please. while(<STDIN>){. unless(m/^@=/){. $data.=$_;. }else{. print "$d
(還有355個字)