Du solltest nicht tr/// verwenden, da das immer nur einzelne Zeichen ersetzt (tr/ab/cd/ ersetzt alle a durch c und alle b duch d), sondern s///.

$ersetzen =~ s/\|\|/\|-1111111/g;