bitwise NOT

[ToddAndMargo via perl6-users]

Hi All,

This works,

   $ p6 'my uint8 $c = 0xA5; my uint8 $d =  +^$c; say $d.base(16);'
   5A

But this does not:

   $ p6 'my uint8 $c = 0xA5; say (+^$c).base(16);'
   -A6

1) who turned it into an negative integer?

2) how do I turn it back?

Many thanks,
-T