is there a simpler way to do the following:
my $dqsel = unpack("I",pack("B*",join('',@exclude)));
exclude is an array of 32 0/1 values which needs to be turned into an unsigned integer to be passed as an argument to a C program. It works, but it feels ugly...