@result = unpack "A16A20A20AA8",$input;