#!/bin/bash
for test in \
"Luis Mendo, Don Muesli" \
"Lynn, Nyl N" \
"Digital Trauma, Tau Digital Arm" \
"Sp3000, P S 3000" \
"Manage Trash So, Those anagrams" \
"Calvins Hobbies, Helka Homba" \
"Android, rains odd" \
"In between days, bayed entwine" \
"Code golf, cod elf got"
do
echo "$test" | sed -rn ':
s/(\w)(.*,.*)\1/\2/i
t
/\w/Q1'
echo $?
done
IyEvYmluL2Jhc2gKCmZvciB0ZXN0IGluIFwKICAgICJMdWlzIE1lbmRvLCBEb24gTXVlc2xpIiBcCgkiTHlubiwgTnlsIE4iIFwKCSJEaWdpdGFsIFRyYXVtYSwgVGF1IERpZ2l0YWwgQXJtIiBcCgkiU3AzMDAwLCBQIFMgMzAwMCIgXAoJIk1hbmFnZSBUcmFzaCBTbywgVGhvc2UgYW5hZ3JhbXMiIFwKCSJDYWx2aW5zIEhvYmJpZXMsIEhlbGthIEhvbWJhIiBcCgkiQW5kcm9pZCwgcmFpbnMgb2RkIiBcCgkiSW4gYmV0d2VlbiBkYXlzLCBiYXllZCBlbnR3aW5lIiBcCgkiQ29kZSBnb2xmLCBjb2QgZWxmIGdvdCIKCWRvCgkKCWVjaG8gIiR0ZXN0IiB8IHNlZCAtcm4gJzoKcy8oXHcpKC4qLC4qKVwxL1wyL2kKdAovXHcvUTEnCgllY2hvICQ/Cgpkb25l