>perl -wMstrict -le
"my $regex = qr/ [^,]+ /x;
 my $var   = 'abcd,ef,,ghijkl,mnop';
 printf qq{'$_' } for $var =~ /$regex/g;
"
'abcd' 'ef' 'ghijkl' 'mnop'