Perl/Variabili vettori: differenze tra le versioni

Contenuto cancellato Contenuto aggiunto
FrescoBot (discussione | contributi)
m Bot: accenti
Nessun oggetto della modifica
Riga 111:
===Notazione [ x , y , z ] e [ x .. y ]===
In Perl esiste la possibilità di estrarre o trattare contemporaneamente più informazioni da un array.
Questo è possibile perché è possibile identificare sintatticamentesinteticamente più informazioni.
#nel caso della notazione [ x , y , z ] si indicano gli elementi alla posizione x, y, z (nell'esempio sono 3, ma possono essere di più o di meno!).
#nel caso della notazione [ x .. y ] si indicano tutti gli elementi che vanno alldall'elemento x a quello y.
Se l'elementogli elementi x e y sono numeri, sonola notazione indica tutti i numeri (incrementatidistanziati dida 1un' unità) che intercorrono fra x e y. Invece, nel caso di lettere (stringhe) sono tutti i caratteri fra la prima lettera (stringa) e l'altra: 'a' .. 'f' equivale ad a, b, c, d, e, f.
Nel caso di stringhe sono tutti i caratteri far una stringa e l'altra: 'a' .. 'f' equivale ad a, b, c, d, e, f.
<source lang="perl">
@alfabeto = ('A' .. 'Z');
Line 222 ⟶ 221:
Assegnare ad un altro vettore i nomi dei mesi usando la funzione split.
<source lang="perl">
@mesi = split ( " " , 'gennaio febbraio marzo aprleaprile maggio giugno luglio agosto settembre ottobre novembre dicembre" );
</source>
 
Line 234 ⟶ 233:
 
'''ESEMPIO4'''
Dati due array : uno con numerazione da 1 a 12, l'altro con il nome dei mesi, scrivere i dati relativi al mese numero 3 nella seguente forma: "il mese " + numero del mese + "ha il nome: " + il relativo nome.
scrivere i dati relativi al mese numero 3 nella seguente forma:"il mese " il numero del mese seguito da "ha il nome :" il relativo nome.
<source lang="perl">
@numeri = ( 1 , 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12 );
Line 243 ⟶ 241:
print join(" "
, "il mese "
, $numeri[$meseDaScrivere -1] # il numero del mese
, "ha il nome: "
, $mesi[$meseDaScrivere -1] # nome del mese
)."\n";