$p = 7;
$n = -$p;        # or 0 - $p
print $n;        # -7
printf "%x", $n; # FFFFFFF9