Paul Johnson wrote:

 If you insist:

echo 123456 | perl -lne 'print join "-", /../g'
Are you *mad*?! Do you think keystrokes grow on *trees*??!!
There's about to be a war on, you know! Start conserving those
characters now, citizen!

  echo 123456 | perl -ple's/..(?=.)/$&-/g'


;-)

Damian


Reply via email to