くだすれPerl（超初心者用）2
at PHP
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
50:nobodyさん 08/04/05 16:02:34 >>49 use strict; my $joined = join "", <>; my @matches = $joined =~ m{(<h\d>.*?</h\d>|<span>.*?</span>)}isg; print map "$_\n", @matches; モジュールは探したけどわからんかった。すまん それと、書いといて難なんだが勉強不足で>>47さんのコードがよく分からないけど こっちのコードだと、でかいファイルを処理するときにjoinで全部繋げてからやってるから たぶん、>>47さんのコードより表示するのが遅くなる キーボード打つ回数も多くなるし 51:nobodyさん 08/04/05 16:21:20 お世話になります>>45です 早速教えていただいたことを取り入れようとしてみたのですが 上手くいきませんでした 2種類あるタグは変数も２つに分けたほうがいいのでしょうか？ 格納の仕方を教えて下さい my $fileに<h1>〜</h1>を格納 my $file2に<span>〜</span>（複数行にわたる）を格納 ２つの変数が格納された後 $file と $file2 の２つの変数をmy @files取り入れるのはどうすればいいですか ハッシュは%linksとしたいです 書き込む時の事も２つになればどうすればいいのか？よくわかっていません foreach my $file (sort keys %links) { print FH qq|\t<li><a href="$file">$links{$file}</a></li>\n| } foreach my $file2 (sort keys %links) { print FH qq|\t<li>$file2</li>\n| } でいいのか変数格納できていないので確かめていないです どなたかよろしくお願い致します
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
5284日前に更新/136 KB
担当:undef