Re: Idea nuovo pacchetto gestione brani biblici

numera.pl

`
#!/usr/bin/perl

$nr=1;
while (){
# Cambia eventualmente %04d con quello che vuoi
print sprintf(“%01d}%s”,$nr,$_);

$nr++;
}
exit;
#e poi dai il comando:
#
#$ cat pluto.txt | ./pippo.pl > filenumerato[Invio]

`