You can use: print $colour, "$num ";