Insert a minus sign ('-') between every two consecutive characters.
For example, translate "abcde" to "a-b-c-d-e".

[ 1] s/./&-/g
[ 2] s/-$//

[ 1] $string = 'abcde';
[ 2] $string =~ s/(.)(?=.)/$1-/g;
[ 3] print "$string\n";