Select Code to Download

my $bitfield = 1;
my $modifier = '+2+16+1024';
...
print "bf: $bitfield\n";
__END__
bf: 1043

my $bitfield = '1';

my $bitfield = '1';  $bitfield = 0+$bitfield;