Perl/Variabili vettori: differenze tra le versioni
Contenuto cancellato Contenuto aggiunto
Nessun oggetto della modifica |
Nessun oggetto della modifica |
||
Riga 179:
'''NOTA''': da notare lo "__" fra la parola "verrà" e la parola "in" : in quel punto c'è un elemento undef e quindi vengono aggiunti 2 "_" (uno per il valore "undef" e uno per il valore "in")
=== Dopo tanta teoria un po' di pratica ===
Vediamo ora una soluzione ottenibile con le informazioni finora trattate.
Assegnare ad un vettore i numeri da 1 a 12, quindi assegnare ad un altro vettore i nomi dei mesi usando la funzione split.
Scrivere i dati relativi al mese numero 3 :"il mese " il numero del mese seguito da "ha il nome :" il relativo nome.
@numeri = ( 1 , 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12 );
@mesi = split ( " " , 'gennaio febbraio marzo aprle maggio giugno luglio agosto settembre ottobre novembre dicembre" );
$meseDaScrivere = 3;
print join(" "
, "il mese"
, $numeri[$meseDaScrivere -1] # il numero del mese
, "ha il nome:"
, $mesi[$meseDaScrivere -1] # nome del mese
)."\n";
'''nota:''' si è usato "$meseDaScrivere -1" perchè il vettore iniziando a contare da 0, il mese 3 ha le informazioni alla posizione 2 nel vettore.
[[Categoria:Perl|Vettori]]
{{Avanzamento|75%|13 luglio 2008}}
| |||