while (<DATA>) {
$var=$_;
$var=~s/(.{10})/$1\\n/;
print "$var";
}

__DATA__
dgbjhdghjdfgjhd
dfgjdjfghjkdhgdfg
dgbhgdfjgjhgdfgdfg
ghgjgglhkdjghkdhgk