First of all you're not creating an excel file but a plain text file containing one word in each line.
Second: "Highlighting" in Excel is not a perl task. Simply apply a conditional formatting to your cells and you should be done.
Or did I misunderstand something?
$\=~s;s*.*;q^|D9JYJ^^qq^\//\\\///^;ex;print