PDA

Visualizza la versione completa : [Perl] Prelevare valore tra 2 stringhe note


Format
27-03-2008, 12:16
Ciao,
ho la necessitÓ di inserire in una variabile la stringa contenuta tra altre 2 in un file, ad esempio:
In un file ho la stringa: <TD align=right>99,0%</td>
devo prelevare il valore numerico che in questo caso Ŕ 99,0%.
Grazie mille :)

Mich_
27-03-2008, 18:05
Se quello e` codice HTML, e` un po' errato e obsoleto: ti converrebbe passare ad una sintassi piu` moderna.

Comunque il problema Perl lo risolvi con una RE:

$str = '<TD align=right>99,0%</td>';
$str ~= /\>(.?+)\</; # estrae quanto racchiuso tra la prima > e la < successiva
print $1;
$1 ~= s/,/\./; # converte il numero in notazione inglese
print $1;

Loading