The $#array notation is handy when you don't know how big an array is. It is the last index in the array.

    my $float = $_->[1] ?
        join( ',', @{$_}[1..$#$_]) : 'n/a';
[download]

You may want those indexes to run through 0..$#$_.