print grep $_, split /(.{1,80})/