$a = 1234; # decimal number$a = -123; # a negative number$a = 0123; # octal number (equivalent to 83 decimal)$a = 0x12; # hexadecimal number (equivalent to 18 decimal)?>