Perl初心者スレ（マジレス回答） (523ﾚｽ)
上下前次1-新

---

98: 2012/11/13(火)22:28 AAS
perl -e '
use utf8;
while (<>)
{
if (/\d+月\d+日のお知らせ！/) { last; };
#skip the line;
};
while (<>)
{
if (/-----/) { last; };

s/^\s+//;
{
no utf8;
s/^(?:　)+//;
}
print;
}'

---

上下前次1-新書関写板覧索設栞歴

---

あと 425 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

ぬこの手 ぬこTOP 0.006s