not sure but i think you need to change
$company =~ s/zzzzz/&/g; # this converts zzzzz to &
to
$company =~ s/zzzzz/\&/g; # this converts zzzzz to &
see backslash in front of &
actually i thought you needed \ in front of & any time you have a substitution expression; can you tell if the company name is coming in correctly? if you turn on debug you should be able to see it.
$company =~ s/zzzzz/&/g; # this converts zzzzz to &
to
$company =~ s/zzzzz/\&/g; # this converts zzzzz to &
see backslash in front of &
actually i thought you needed \ in front of & any time you have a substitution expression; can you tell if the company name is coming in correctly? if you turn on debug you should be able to see it.