Select Code to Download

open my $filehandle, ...

...
    my @fields = split /$field_separator/ => $record;
    ...
}

open my $filehandle, ...

...
    my @fields = split /$field_separator/;
    ...
}