Select Code to Download

$ perl -w -E '@values = split ",", "1,2,3,4", -1; say join ",", @value
+s'
1,2,3,4
...
,,3,
$ perl -w -E '@values = split ",", ",,,", -1; say join ",", @values'
,,,