ma perchè while(*(punt+b)); non fa il suo lavoro?

cioè ripetere il ciclo punt+a fino a che non incontra \0

in perl funziona! con un semplice for!!!