open file.xml ;
$i = 0;
for //foo set . {++$i} ;
save :b ;