#!/usr/bin/perlprint join(", ", split(//, "123"));
Standard input is empty
1, 2, 3
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!