[Linux-Biella] perl

[Claudio M.]

Il mercoledì 14 aprile 2010 21:35:41 vallini.daniele a bilug.linux.it ha 
scritto:
> In perl per il parsing di un file devo analizzare solo le righe pari.
>
> Generare a mano l'array con tutti i numeri pari da 0 a qualche centinaio
> a questo modo mi garba poco:
>
>  foreach $Riga
> (0,2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40,42,44,
> 46,48,50,52,54,56,58,60,62,64,66,68,70,72,74,76,78,80,82,84,86,
> 88,90,92,94,96,98,100)
>
> Non so come fare, il ciclo for mi pare incrementi solo di una unita' per
> volta.
>
> Mi sfugge qualcosa del beneamato perl ?

Il parsing come lo fai? riga per riga?
In caso positivo penso userai una cosa del genere
while (<>) {

}

dove all'interno del <> metti quello che ti serve
se fai cosi prima del while setti una variavile a 0
$i = 0;

poi all'interno del ciclo per fare il controlo metti una cosa del genere
if (int ($i/2) eq ($i/2)) {
	"fai quello che devi fare"
}
all'interno dell'if verifico se la parte intera della divisione del contatore 
per due e' uguale alla sola divisione, in caso affermativo $i e' pari 
altrimenti no

A questo punto il codice sara' una cosa del genere

$i++;
while (<>) {
	if (int ($i/2) eq ($i/2)) {
		"fai quello che devi fare"
	}
	$i++;
}

Spero di esere stato di aiuto

Bye

-- 
Contatto skype: cmaffio
Linux User: #151147