$attname[$x]=~ s/[^A-Za-z0-9\-\.]//g;