my $byteval  = unpack "x3C", $buf;