「Perl2次元配列」の版間の差分

提供: dococo wiki
ナビゲーションに移動 検索に移動
imported>Webmaster
imported>Webmaster
13行目: 13行目:
 
| 3 || た || ち || つ || て || と
 
| 3 || た || ち || つ || て || と
 
|}
 
|}
単純な50音表
+
単純な50音表、こんな形が2次元配列というイメージがあると思う<br />
{| class="wikitable"
+
== 配列への代入方法 ==
|+ 表のタイトル
+
ひとつ、ひとつブラケット <code>[</code>で括ってやって指定する方法<br />
! 見出し0 !! 列見出しA !! 列見出しB !! 列見出しC
 
|-
 
! 行見出し1
 
| セル1A || セル1B || セル1C
 
|-
 
! 行見出し2
 
| セル2A || セル2B || セル2C
 
|}
 
  
 +
<syntaxhighlight lang="perl">
 +
my @jdata;
 +
$jdata[0][0] = "あ";
 +
$jdata[0][1] = "い";
 +
$jdata[0][2] = "う";
 +
$jdata[0][3] = "え";
 +
$jdata[0][4] = "お";
 +
 +
$jdata[1][0] = "か";
 +
$jdata[1][1] = "き";
 +
$jdata[1][2] = "く";
 +
$jdata[1][3] = "け";
 +
$jdata[1][4] = "こ";
 +
 +
foreach my $var1 (@jdata) {
 +
foreach my $var2 (@{$var1}) {
 +
print "$var2 ";
 +
}
 +
print "\n";
 +
}
 +
</syntaxhighlight>
 
----
 
----
 
<!-- カテゴリに追加するページ名を記入 -->
 
<!-- カテゴリに追加するページ名を記入 -->
 
[[Category:Perl|にじげんはいれつ]]
 
[[Category:Perl|にじげんはいれつ]]

2017年10月15日 (日) 08:42時点における版

もう少し2次元配列について詳しく記録しておく
2次元配列のイメージはこんな感じだとおもう

2次元配列
0 1 2 3 4
0
1
2
3

単純な50音表、こんな形が2次元配列というイメージがあると思う

配列への代入方法

ひとつ、ひとつブラケット [で括ってやって指定する方法

	my @jdata;
	$jdata[0][0] = "あ";
	$jdata[0][1] = "い";
	$jdata[0][2] = "う";
	$jdata[0][3] = "え";
	$jdata[0][4] = "お";

	$jdata[1][0] = "か";
	$jdata[1][1] = "き";
	$jdata[1][2] = "く";
	$jdata[1][3] = "け";
	$jdata[1][4] = "こ";

	foreach my $var1 (@jdata) {
		foreach my $var2 (@{$var1}) {
			print "$var2 ";
		}
		print "\n";
	}