Pregunta de entrevista de Yahoo

the long perl code.