荔园在线

荔园之美,在春之萌芽,在夏之绽放,在秋之收获,在冬之沉淀

[回到开始] [上一篇][下一篇]


发信人: earthworm.bbs@bbs.sjtu.edu.cn (岁月的童话), 信区: Linux
标  题: Re: 求 Perl表达式一个
发信站: 饮水思源 (Sun Mar 20 11:28:21 2005)
转信站: SZU!news.szu.edu.cn!bbsnews.sdu.edu.cn!SJTU

$string="<good guy> good boy <good good guy>";
$string=~s/(<)(.*?)(\>)/space($2)/eg;
print $string;
sub space{
$s=shift;
$s=~s/(\s*) /_/g;
return $s;


【 在 EEfpga (SPICE's not spicy:() 的大作中提到: 】
: 随便用sed写的
: sed -e ': loop;s/\(<[^> ]*\) /\1_/g;h;x;t loop'
: 除了能完成要求以外,似乎没什么优点
: 【 在 earthworm (岁月的童话) 的大作中提到: 】
: : 请教个perl正则表达式
: : 想把<>中的所有的空格替换成_
: : 比如
: : <good guy> good boy <good good guy>
: : =>
: : <good_guy> good boy <good_good_guy>
: .................(以下省略)

--

    饮 水 思 源
※ 来源:·饮水思源 bbs.sjtu.edu.cn·[FROM: 202.120.61.3]


[回到开始] [上一篇][下一篇]

荔园在线首页 友情链接:深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店