Select Code to Download

chomp(my $sep = <>);
say join $sep, @data;

chomp(my $sep = <>);
$sep =~ s/\\t/\t/g;
say join $sep, @data;