すいません、質問させてください。
x成分の速度データが入った「a.txt(中身は1,1,1,1,とする)」、
y成分の速度データが入った「b.txt(中身は2,2,2,2,とする)」があって
二つの成分を合わせた速度データを作成することは可能でしょうか？
仮にそれをc.txtとすると中身は{(1^2+2^2)^0.5},{(1^2+2^2)^0.5},{(1^2+2^2)^0.5},{(1^2+2^2)^0.5},
すなわち√5,√5,√5,√5,となるようにしたいのですが。
以下のようなプログラムを作ってみたのですが、失敗しました。
open IN, "a.txt";
while (<IN>) {

@nums = split(/\,/,$_);

}
close IN;
open IN, "b.txt";

while (<IN>) {

@suuji = split(/\,/,$_);
}
close IN;

for($i=0;$i<=3;$i++ ){
$goukei[$i] = $nums[$i] ** 2 + $suuji[$i] ** 2;
$sokudo = $goukei ** 0.5,",";
@sokudo = split(/\,/,$sokudo)
}
print @sokudo;