Cümlede birden fazla boşluk varsa tümünü bir sıra kaydırır..
//echo : $spc(deneme cümlesi).+ = denemec ümlesi
//echo : $spc(deneme cümlesi).- = denem ecümlesi
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias spc {
if ($prop == +) { noop $regsub($1-,/( )(.)/g,\2\1,%r) | return %r }
elseif ($prop == -) { noop $regsub($1-,/(.)( )/g,\2\1,%r) | return %r }
else {
return Kullanım: $!spc(<metin>).+ [ileri] veya $!spc(<metin>).- [geri]
}
}