my $dec = vec($binword,0,32);