$analysis =~ tr/#/?/;
$analysis =~ tr/&/%/;