Help for this page
use strict; use warnings; ... Output: ------- "Transcription factor",promoter,DNA,"Transcription factor",promoter,DN +A.
$str =~ s/((?:(?!\").)*)(\"[^\"]+\")((?:(?!\").)*)/ my $fi = $1;my $se = $2; my $th = $3; $fi =~ s| |\,|g;$th =~ s| |\,|g; "$fi$se$th"/egs;
www.com | www.net | www.org
No recent polls found