in reply to one liner to capture value of field and insert in another field

perl -i~ -F'\|' -lane 'print join "|", @F[0..9], $F[7], ""'

-F specifies the separator.
-a populates the @F array with the cell values for each row.
-l handles the newlines.

See perlrun for the details.

لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ