|
> 夜雨______やう________ night_rain
> 空ら手形__からてがた__(n)_bad_(fictitious)
> のような、漢字部分、ひらがな部分、英語部分のスペースが一定してい
> ないもののうち、漢字部分のひらがなは残して、ひらがな部分だけを削
> 除して、下記のように、空白を全角1字分に揃えたいのですが、無理で
> しょうか。
> 雨_night_rain
> 空ら手形_(n)_bad_(fictitious)
こんな感じです ...
「゛゜ー」も削除の対象にしています。
//*1 a2a.mac
$okikae_moji = "\\x81\\x40";
replaceall "[\\x20\\x81\\x40]+[ぁ-ん゛゜ー]+[\\x20\\x81\\x40]+", $okikae
_moji, regular, inselect, ask;
endmacro;
//*1 a3a.mac
$okikae_moji = "\\x81\\x40";
replaceall "[\\x20]+[ぁ-ん゛゜ー]+[\\x20]+", $okikae_moji, regular, inse
lect, ask;
endmacro;
|
|