use warnings;
use strict;
use feature 'say';

my $num = 1023; # 0x03ff
my ($b1, $b2);

##</code><code>##

$b1 = ($num & 0xff00) >> 8;
$b2 = $num & 0xff;

printf("%x, %x\n", $b1, $b2); # 3, ff

##</code><code>##

$b1 = $num & 0xff;
$b2 = ($num & 0xff00) >> 8;

printf("%x, %x\n", $b1, $b2); # ff, 3

##</code><code>##

use warnings;
use strict;
use feature 'say';

my $num = 1023;

my ($b1, $b2);

$b1 = ($num & 0xff00) >> 8;
$b2 = $num & 0xff;

printf("%x, %x\n", $b1, $b2);

$b1 = $num & 0xff;
$b2 = ($num & 0xff00) >> 8;

printf("%x, %x\n", $b1, $b2);