kannst dir deine Bitmaske auch ohne geshifte selber schreiben, wenn du das besser verstehst :)

my $bitmaske = 0b00000100;