Saintmike,
Thankyou =, exactly what I need, I haven't done bit twiddling in perl before. So simple.....

Warm Regards Paul.