El signo codice_1 en la segunda y tercera línea es un 'token comentario', que permite al intérprete perl ignorar todo lo que le siga, hasta el final de la línea de texto.