my $t1 = 0xC05E04; my $t2 = unpack('f', $t1);