回答編集履歴
1
一部,プログラムの分かりにくい点を改善
test
CHANGED
@@ -24,7 +24,7 @@
|
|
24
24
|
|
25
25
|
# tab(\t)でデータを分割
|
26
26
|
|
27
|
-
my @sp = split(
|
27
|
+
my @sp = split(/\t/, $_);
|
28
28
|
|
29
29
|
|
30
30
|
|
@@ -116,7 +116,7 @@
|
|
116
116
|
|
117
117
|
# tab(\t)でデータを分割
|
118
118
|
|
119
|
-
my @sp = split(
|
119
|
+
my @sp = split(/\t/, $_);
|
120
120
|
|
121
121
|
|
122
122
|
|