my $hex = "d0cf11e0a1b11ae1000000000000000001000000feffffff0000000037000000ffffffff";
my $bin = pack "H*", $hex;

for my $val (unpack "l<*", $bin ) {
    # last if $val == -1;
    print "val=$val\n";
}

##</code><code>##

val=-535703600
val=-518344287
val=0
val=0
val=1
val=-2
val=0
val=55
val=-1

##</code><code>##

val=3759263696
val=3776623009
val=0
val=0
val=1
val=4294967294
val=0
val=55
val=4294967295