fix #120517, Str:D:.words returns the one elem if it is just one

This way .perl on it looks a bit nicer.