>>26
s/(.)[ッ|っ](.)(.)/$1$2ー$3/
だろ?jperlキライだが。