Select Code to Download

$ perl -e " print qq!($_)\n! for split /,/, q!,1,2,3!"
()
...
(2)
(,)
(3)

$ perl -e " print qq!($_)\n! for split /,/, q!5,,,!"
(5)

...
(,)
()
(,)