#!/usr/local/bin/perl

$intval = 3143230627;
$hexval = sprintf ("%x", $intval);
printf "value of $intval : $hexval \n";

$intval = 123143230627;
$hexval = sprintf ("%x", $intval);
printf "value of $intval : $hexval \n";