print join (' ', unpack("(A4)*", $str));