Perl初心者スレ（マジレス回答） (523ﾚｽ)
Perl初心者スレ（マジレス回答） http://mevius.5ch.net/test/read.cgi/tech/1349538519/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
189: デフォルトの名無しさん [sage] 2014/02/13(木) 06:54:32.76 >>187 Perl関連スレ、何故か荒らしが住み着いてるからなあ http://mevius.5ch.net/test/read.cgi/tech/1349538519/189
363: デフォルトの名無しさん [sage] 2015/04/12(日) 20:06:31.76 ID:eedq/AcT >>361さんの回答で先入観が排除され、 意味がわかりました。 $mes =~ s/_HOGE_/$name/g; 文字列に埋め込まれた_HOGE_を別の変数に代入されてる文字列と置換させていました。 ありがとうございました。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/363
378: デフォルトの名無しさん [] 2015/08/31(月) 18:13:02.76 ID:zR+vvNwg >>377 ありがとう perlのリファレンス表記がこの機会に少し分かりました my @car = (1, 2); my @cdr = (3, 4); my @both = ( \@car, \@cdr); print("$both[0]->[0]\n"); print("$both[0]->[1]\n"); print("$both[1]->[0]\n"); print("$both[1]->[1]\n"); print("@{$both[0]}\n"); print("@{$both[1]}\n"); http://mevius.5ch.net/test/read.cgi/tech/1349538519/378
469: デフォルトの名無しさん [sage] 2018/11/22(木) 10:30:19.76 ID:Enb78Zev これでいけると思いましたが、玉砕でしたｗ foreach my $row (@$table){ while (my ($id, $count, $name) = each(%row)){ print encode('cp932', "$id\t$count\t$name\n"); } http://mevius.5ch.net/test/read.cgi/tech/1349538519/469
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.020s