| |
|
1:
#!/usr/bin/perl
|
|
2:
|
|
3:
#
|
|
4:
# Quotiamo la stringa <FONT FACE="Arial">Prova</FONT>
|
|
5:
#
|
|
6:
|
|
7:
#
|
|
8:
# Quotiamo con le virgolette
|
|
9:
#
|
|
10:
$string = "<FONT FACE=\"Arial\">Prova</FONT>;
|
|
11:
|
|
12:
#
|
|
13:
# Sconveniente! Abbiamo dovuto commentare 2 caratteri con un \
|
|
14:
# Proviamo con la forma generale: qq//
|
|
15:
#
|
|
16:
$string = qq/<FONT FACE="Arial">Prova<\/FONT>/;
|
|
17:
|
|
18:
#
|
|
19:
# Meglio! Ma abbiamo ancora uno slash commentato
|
|
20:
# Cambiamo delimitatore:
|
|
21:
#
|
|
22:
$string = qq|<FONT FACE="Arial">Prova</FONT>|;
|
| |