Help for this page

Select Code to Download

Select or download this
```
$ perl -le 'print ord("5") << 4'
848
```
Select or download this
my $swapped = (ord($_) << 4 | ord($_) >> 4) & 0xFF;