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