$data =~ s/&(.*);//g;