Risolto..in Perl....

[thread.net]

Grazie a Silver Black
(e a KeyroEvolution )



Ci ho messo un po' ma
il problemino di cui al topic : http://www.MegaLab.it/forum/viewtopic.p ... highlight=

l'ho risolto cosi' : in Perl

Codice: Seleziona tutto

#!/usr/bin/perl

@turni = ("t1","t2","t3","t4","t5","t6","t7","t8","t9","t10","t11","t12","t13","t14","t15","t16","t17","t18","t19","t20","t21");
@giorni = (1 .. 365);
@giorni == @{$_[0]};

for ($i = 0; $i <$giorni[364]; $i ++){
   
     $turni[$i] = $turni[$i % 21];

 

print " $giorni[$i]-----  TURNO : ------$turni[$i]\n";
}



Il problema era "ciclare" una sequenza di tot turni in numero finito (21)
all'interno di un anno intero di lavoro..
Cosi ho cercato in rete delle funzioni le ho provate e le ho adattate al mio scopo (con Perl ..e' abbastanza intuitivo come linguaggio lo consiglio a chi vuole iniziare....).
Il bello viene ora che devo inserire il tutto in interfaccia grafica.
Io uso le PerlTk ; se qualcuno vuole darmi consigli sa dove trovarmi...

Ripeto : grazie ai ragazzi che mi hanno aiutato....

ciao.. thread