prova a fare così:
$intestazioni = "From: Norcia Food <info@norciafood.it>\r\n";

if(mail($dest, $oggetto, $body, $intestazioni) ........

in tal modo vedi se l'errore sta in $intestazioni.

Se neanche così funziona, prova a semlificare pure $messaggio, mettendo $messaggio = "Prova";
Almeno così abbiamo qualche indizio in +.