perl -lne 'print $1."\." if(/(.*, .).*/)'
simon, gaurent simon, gaurent simon, gaurent simon, gaurent simon, gaurent simon, gaurent simon, gaurent
simon, g. simon, g. simon, g. simon, g. simon, g. simon, g. simon, g.
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!