use strict;
use warnings;

my @values = ( "05F9AD", "F4EC9E", "0005" );
foreach my $value (@values) {
    my $decval = hex($value);
    printf "Hex value 0x%08lx = %ld (decimal)\n", $decval, $decval;
}

##</code><code>##

Hex value 0x0005f9ad = 391597 (decimal)
Hex value 0x00f4ec9e = 16051358 (decimal)
Hex value 0x00000005 = 5 (decimal)