use bignum;$\=$/;$,=$"; print map { pack "C${\(length>>1)}", unpack "x3(a2)*", log } 51063670, 20632319030177, 54134528, 1100260138130;