Esto es una prueba Perl
Algo fácil
Pero que no funcionará.
Aunque contar, cuenta
El número total de líneas es 4