use constant BIT0 => 0; use constant BIT1 => 1; use constant BIT2 => 2; use constant BIT3 => 4; #...