Help for this page

Select Code to Download

Select or download this

my $csv = Text::CSV->new ( { quote_space => 0 } )
                 or die "Cannot use CSV: ".Text::CSV->error_diag ();
...
my @columns = ("What, a nice day", "This is a fence", "Here is an,and 
+day");

print $csv->string() if $csv->combine(@columns);

Select or download this

"What, a nice day",This is a fence,"Here is an,and day"