dec(998)  == 998
dec(999)  == 999
dec(1000) ==   8
dec(1001) ==   9
dec(1002) == 514

##</code><code>##

# changebase($number, $from[, $to]);

print changebase(255, 10, 16);
# FF
print changebase(0xFF, 16, 10);
# 255
print changebase('FF', 16);  # assume change to base 10 when no 'to' is supplied
# 255
print changebase('FF', 16, 2);
# 11111111

##</code><code>##

use Base;
$hex = new Base 16 => 'FF';
print $hex;            # Stringify
# FF
print $hex->binary;    # Return value only ($hex->binary is an alias for $hex->base 2)
# 11111111
print $hex;
# FF
print $hex->to_binary; # Change value
# 11111111
print $hex;
# 11111111