Why not do:

($a, $b, $c) = svd($matrix);
# convert to a perl list
my @bvals = list $b;
[download]

There's no need to parse out the values from a string. (By the way, your example has four values, not three).