in reply to test output in colour ?

You could have a look at Term::ANSIColor.

Cheers,

JohnGG