Re: [問題] print 特定段落
#!/usr/bin/perl
$str=qq~
sage 1
1
2
3
sage 2
4
5
6
sage 3
7
8
sage 4
.
.
.
~;
my @data = split(/sage\s\d+$\//,$str);
print $data[1]; # assume [1] is portion 1
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.114.71.152
推
08/14 18:37, , 1F
08/14 18:37, 1F
推
08/14 19:46, , 2F
08/14 19:46, 2F
推
08/14 19:49, , 3F
08/14 19:49, 3F
※ 編輯: LiloHuang 來自: 140.114.71.152 (08/14 19:50)
推
08/14 20:01, , 4F
08/14 20:01, 4F
討論串 (同標題文章)
完整討論串 (本文為第 2 之 6 篇)：
1
3
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
