- 1 名前：デフォルトの名無しさん [2014/02/19(水) 23:36:23.29 .net]
- CGIについての質問は板違いです。WEBプログラミング板でどうぞ。
CGIとPerlの区別がつかない人もWEBプログラミング板に行ってください。
（WEBプログラミング板: kohada.2ch.net/php/）
このスレでは（CGI以外の）純粋にPerlのみに関係する質問を取り扱っていこうと思います。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
荒らしはスルー推奨。
"The duct tape of the Internet" こと、Perlについての質問箱です。
"There's more than one way to do it" ということで、
Perlの奥深さについて皆で語り合い、追求してまいりましょう。
www.perl.org/get.html
Download Latest Stable Source (5.18.2)
▼前スレ
Perlについての質問箱 61箱目
toro.2ch.net/test/read.cgi/tech/1381561905/
Perlについての質問箱 62箱目
toro.2ch.net/test/read.cgi/tech/1385039352/
- 162 名前：153 mailto:sage [2016/05/05(木) 19:19:01.51 ID:eJss6EWw.net]
- ちょっとサンプル省略しすぎてすみません。
":encoding(cp932)"
等で漢字の表示は問題ありませんm(__)m
while ( $line[0] = <DATA> ) {
$line[1] = <DATA>;
$line[2] = <DATA>;
....
のように分解して書くと問題ありません。（DATAは必ず3行一組になります）
一度に、3行読み込む方法があればお教えくださいm(__)m
- 163 名前：デフォルトの名無しさん mailto:sage [2016/05/05(木) 21:40:51.68 ID:AhXWZZ47.net]
- @line[0..2]
配列スライスのシジルは@
- 164 名前：デフォルトの名無しさん mailto:sage [2016/05/05(木) 23:21:34.59 ID:zs5en64n.net]
- 都合よく固定長を前提にはできないだろうから、
# 全部読んじゃって
chomp(@_ = <DATA>);
# 3つづつ処理する
while (@line = splice(@_,0,3)) {
print map {"[$_]"} @line;
print "\n";
}
__END__
1
2
3
4
5
6
7
8
9
|
 |
