Thanks, after reading antirice's reply above, I ended up with something very similar to your suggestion:
 @charBits = split(//, unpack("b8", @chars[$currentChar])); which does the trick quite nicely.
Thanks again
Gerard