just lookahead to make sure the '&' is not followed by 'amp;' :

s/&(?!amp;)/&/g
[download]

hth

   larryk                                          
perl -le "s,,reverse killer,e,y,rifle,lycra,,print"