$ echo habíamos reservado habitaciones. | perl -CIO -pe 's/\p{XPosixAlpha}/-/g;'
-------- --------- ------------.