Select Code to Download

sub csv_split    {

...
    # Elegance might demand a wantarray solution here. It's unclear.
    @array;
}

sub csv_split {
    local $_ = shift // return;
...

    wantarray ? @array : \@array;
}