print map "$_\n", /\G(.{1,80})/gs;