質問編集履歴
2
誤記修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -14,15 +14,15 @@
|
|
|
14
14
|
これを下記みたいな配列にしたいです。
|
|
15
15
|
|
|
16
16
|
```
|
|
17
|
-
$node{"sv1"}[0]=eth0;
|
|
17
|
+
$node{"sv1"}[0]="eth0";
|
|
18
|
-
$node{"sv1"}[1]=eth1;
|
|
18
|
+
$node{"sv1"}[1]="eth1";
|
|
19
|
-
$node{"sv2"}[0]=eth0;
|
|
19
|
+
$node{"sv2"}[0]="eth0";
|
|
20
|
-
$node{"sv2"}[1]=eth1;
|
|
20
|
+
$node{"sv2"}[1]="eth1";
|
|
21
|
-
$node{"sv2"}[2]=eth3;
|
|
21
|
+
$node{"sv2"}[2]="eth3";
|
|
22
|
-
$node{"sv3"}[0]=eth0;
|
|
22
|
+
$node{"sv3"}[0]="eth0";
|
|
23
23
|
```
|
|
24
24
|
|
|
25
|
-
|
|
25
|
+
データ数等は不明なので、pushでやりたいのですが、うまく実現出来ません。
|
|
26
26
|
|
|
27
27
|
|
|
28
28
|
```
|
1
誤記修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -26,7 +26,7 @@
|
|
|
26
26
|
|
|
27
27
|
|
|
28
28
|
```
|
|
29
|
-
#リストを@listに代入済み。
|
|
29
|
+
#csvのリストを@listに代入済み。
|
|
30
30
|
#
|
|
31
31
|
foreach $a (@list) {
|
|
32
32
|
push(@node{$a->[0]},$a->[1]);
|