With every loop you destroy the data in %conductordata, so perhaps you want to change it to:

for ($i=1 ;$i<=$number ; $i++) {
  $conductordata{"conductor$i"} = 
    [$values{"radius$i"}, $values{"length$i"}]
}
[download]

This way you get a hash element for each conductor. To print the data, you can do the following:

for (keys %conductordata) {
  print "$conductordata[0] $conductordata[1]\n";
}
[download]