#!/usr/bin/perl -p# your code goes herefor($i=0;$i<length;){$i=(s/(.).{$i}\1/\1/)?0:$i+1;}
examples programming puzzles codegolf andromeda abcbaccbabcb if(x==1):x++ fnabnfun
es praming puzles colf a acb if(x+ fun
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!