@singlebyte= vec $string,0,8;
@twobyte0= vec $string,0,16;
@twobyte1= vec $string,8,16;
...
@threebyte2= vec $string,16,24;