Interesante aporte, pero seria bueno cambiar ciertas cosas:
Es mala idea apoyar el codigo en comandos externos, por eso Larry Wall decido crear Perl en vez de usar shell.
Mejor usa
localtime(time) (lee la docentacion: perldoc -f localtime).
La funcion
chop solo quita el ultimo caracter de una cadena, eso quiere decir que si modificamos el codigo para hacerlo multiplataforma, no quitara el fin de linea, por eso es mejor usar
chomp que quita el fin de linea.
Es buena practica usar los pragmas
strict y
warnings ya que te "obligan" a programar mejor.
