Nelle operazioni tra valori numerici e stringhe,
il linguaggio Perl si comporta nel modo più naturale possibile,
senza creare spiacevoli disaggi al programmatore, pertanto i
principi fondamentali da seguire sono due, e cioè:
Se si usa un valore numerico in una stringa, il
valore numerico viene convertito anch'esso in stringa, i cui
caratteri corrispondono alle cifre del valore numerico.
Se si usa un valore stringa nel contesto
numerico, il valore stringa verrà convertito in un valore numerico,
in base ai caratteri numerici contenuti all'interno della stessa,
diversamente si avrà un valore numerico uguale a zero.
Vediamo ora alcuni esempi
$a = "11 " . "maggio "
. "2000";
# in questo caso i valori numerici
# 11 e 2000 vengono addizionati al
# valore stringa "maggio" mediante
# l'operatore di addizione stringhe
# per risultato si otterrà che anche
# i valori 11 e 2000 saranno considerati
# come stringhe
print "$a \n";
# vale 11 maggio 2000
$b = "11 " + "maggio
" + "2000";
# in questo caso invece abbiamo usato
l'operatore
# addizione numerico + costringendo pertanto
# l'interprete a considerare la stringa maggio
# come numero, in questo caso uguale a 0
print " $b \n";
# vale 2011
$c = 15000 - "2500 lire";
print " $c \n";
# vale 12500
Provate quindi a salvare ed ad eseguire lo script, per la prova
di verifica.