Perl/Applicare la teoria: differenze tra le versioni

Contenuto cancellato Contenuto aggiunto
Nuova pagina: Si è visto finora tante nozioni , vediamo "nel poco possibile" cosa si può fare: 1) Creiamo un array con i giorni della settimana : @g_sett = ( "lun" , "mar" , "mer" , "gio" , "ve...
 
Nessun oggetto della modifica
Riga 9:
for ( $a = 0 ; $a < @g_sett ; $a++ )
{
$g_sett_it{giorno = $g_sett[$a]} = $a+1;
$g_sett_it{$giorno} = $a+1;
}
 
Line 25 ⟶ 26:
{
$num = $g_sett_it{$K};
 
$num_g_sett_it{$num} = $K;
}
 
4) Creiamo una stringa così formata "uno due tre quattro cinque sei sette"
 
$str = "uno due tre quattro cinque sei sette ";
 
5) Dividiamo il contenuto il pezzi in modo da ottenere le parole separate:
 
@num_a_lettere = split ( " " , $str );
 
6) Creiamo un altro hash dei giorni della settimana che abbia, al posto dei numeri, le stringhe che rappresentano i numeri:
 
NOTA : i giorni della settimana e i numeri sono "ordinati" e corrispondenti !
 
for ( $a = 0 ; $a < @g_sett ; $a++ )
{
$giorno = $g_sett[$a];
$num = $num_a_lettere[$a];
$g_sett_lett_it{$giorno} = $num;
}
7) Ora elenchiamo i giorni della settimana come nomegiorno , numero
foreach $g ( @g_sett ) # Così sono ordinati da lun a Dom
{
print "giorno : $g , numero $g_sett_it{$g} \n";
}
 
8) Ora facciamo la stessa cosa ma con i numeri "letterali" :
 
foreach $g ( @g_sett ) # Così sono ordinati da lun a Dom
{
print "giorno : $g , numero $g_sett_lett_it{$g} \n";
}
 
Se siete riusciti a seguire fino qui allora ... è ora di proseguire la lettura !
5) Dividiamo il contenuto il pezzi in modo da ottenere le parole separate