use strict;
use warnings;
use Math::Int64 qw( hex_to_int64 );
use Test::More;

my $normalnum = 0;
is($normalnum, hex_to_int64("0x8000200030004000"), "some test");