Tarea de Perl

No es una sola tarea.. Me interesa tener a un coach que cuando lo necesite lo pueda contactar para sacarme de dudas. La primera tarea/ejemplo se puede resumir de la siguiente manera.

1) tengo 1 bus con un recorrido de 10 paradas y hace 10 rondas por dia:

my @Mis_Paradas = ("Avenida 1", "Avenida 2", "Avenida 3", "Avenida 4",  "Avenida 5","Avenida 6", "Avenida 7", "Avenida 8", "Avenida 9", "Avenida 10");

2) Cada ronda se hace en una secuencia ascendiente de "Avenida 1" a "Avenida 10" y despues de hacer las 10 paradas comienza otra vez. El bus hace otra vez las 10 paradas de "Avenida 1" a "Avenida 10" y esto se repite 10 veces por dia.. (10 rondas).

Supuestamente hay un operario en cada parada que controla el tiempo del bus.

Vamos a suponer que haciendo click en la pagina es que el bus llego a una parada y con la funcion de tiempo de perl, el operario tomo nota de la hora y se guardara el tiempo de llegada a la parada correspondiente en una base de datos:

my $Tiempo_de_llegada = time;

las siguientes son columnas de la base de datos en un archivo de texto:

"avenida 1", "avenida 2", "avenida 3", "avenida 4",  "avenida 5","avenida 6", "avenida 7", "avenida 8", "avenida 9", "avenida 10".

Cada vez que se hace click a la pagina es el simulacro de que se hizo una parada y el operario tomo el tiempo, y lo que tiene que hacer el codigo es guardar el valor de  $Tiempo_de_Llegada en la columna correspondiente  cada parada.

La primera vez que se hace click a la pagina el codigo debe guardar el resultado de $Tiempo_de_Llegada en el primer renglon del archivo de texto "Tiempo_de_Rondas.txt" en la primera columna "Avenida 1".

La segunda vez que se hace click a la pagina el codigo debe guardar el resultado de $Tiempo_de_Llegada en el primer renglon del archivo de texto "Tiempo_de_Rondas.txt" en la psegunda columna "Avenida 2".

Esto se repite 8 veces mas hasta terminar la primera ronda guardando el $Tiempo_de_Llegada en el primer renglon en la columna "Avenida 10".

Habiendose terminado la primera ronda con el click numero 11  el codigo comienza a guardar los $Tiempo_de_Llegada en el segundo renglon del archivo de texto "Tiempo_de_Rondas.txt", otra vez de "Avenida 1" a "Avenida 10".

Habiendose terminado la segunda ronda con el click numero 21  el codigo comienza a guardar los $Tiempo_de_Llegada en el tercer renglon del archivo de texto "Tiempo_de_Rondas.txt", otra vez de "Avenida 1" a "Avenida 10".

Habiendose terminado la tercera ronda con el click numero 31 el codigo comienza a guardar los $Tiempo_de_Llegada en el tercer renglon del archivo de texto "Tiempo_de_Rondas.txt", otra vez de "Avenida 1" a "Avenida 10".

Esto se repite 7 veces mas simulando que cada 10 clicks se completa una ronda y la ultima ronda termina con el click numero 100, guardanto el $Tiempo_de_Llegada en el decimo renglon del archivo de texto "Tiempo_de_Rondas.txt",en la ultima columna "Avenida 10".

No espero que tu escribas el codigo sino que me explique a traves de Skype  como hacer cambios apropiados al codigo que se vera algo asi:

foreach $Parada (@Mis_Paradas){

        open (TIEMPO, ">Tiempo_de_Rondas.txt") || die print "Error 5645";
             
                  if("aqui me falta la condicional con la que tu me tienes que ayudar"){
                  print tiempo "$tiempo_de_llegada\n";
                  }
       
        close (tiempo);
        chmod(0666, "tiempo_de_rondas.txt") || die print "Error 82";    
     
}  #### Termina foreach

con la ultima romda se termina el proceso.

Exit;

Eso es todo

Agradezco tu ayuda y con gusto te dare la recompensa que determines, a traves de los metodos de pago que acepte esta pagina que al ser mi primer proyecto, todavia no se como se paga, pero tengo tarjeta, PayPal y Bitcoins... ai es que no veo que haya ningun problema

gracias de antemano

Sebastian