my $string = "foo , bar";
    my @pieces = split /\s*,\s*/, $string;