[過去ログ]
プログラミングのお題スレ Part13 (1002レス)
プログラミングのお題スレ Part13 http://mevius.5ch.net/test/read.cgi/tech/1549160513/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
638: 623 [sage] 2019/03/12(火) 22:49:08.83 ID:oX4bYoPv >>623 お題を修正 [ ] = の3つは、特別な記号です。 それらを含まない行は、無視して [sec1] key1=val1 [sec2] key2=val2 x=y >>627 セクション名・キー名・値は、特定の文字列ではありません! 特別な記号以外の、任意の文字列です http://mevius.5ch.net/test/read.cgi/tech/1549160513/638
646: デフォルトの名無しさん [sage] 2019/03/13(水) 00:54:41.38 ID:bUFEpZHr >>638 > セクション名・キー名・値は、特定の文字列ではありません! > 特別な記号以外の、任意の文字列です えぇ… 入力: [あああ] いいい=ううう [えええ] おおお=かかか 出力: あああ:いいい:ううう えええ:おおお:かかか 少なくとも任意の文字列には対応してるじゃん。不当指摘だ! http://mevius.5ch.net/test/read.cgi/tech/1549160513/646
656: デフォルトの名無しさん [sage] 2019/03/14(木) 01:16:23.50 ID:vRIsxo2e >>638 Perl5 $r = qr/[^][=]/; while (<DATA>) { chomp; $s = $1 if /\[($r+)\]/; print "$s:$1:$2\n" if /($r+)=($r+)/; } __DATA__ [sec1] key1=val1 [sec2] key2=val2 実行結果 ~ $ perl 13_638.pl sec1:key1:val1 sec2:key2:val2 http://mevius.5ch.net/test/read.cgi/tech/1549160513/656
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.028s