$ perl -le 'print for map "<$_>", split /,/, "a,b,c,,,,"' $ perl -le 'print for map "<$_>", split /,/, "a,b,c,,,,FOO"' <> <> <>