亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix

標(biāo)題: 在線求教,如何把一個字符串替換成多個 [打印本頁]

作者: zxx218    時間: 2005-05-26 19:39
標(biāo)題: 在線求教,如何把一個字符串替換成多個
小弟是新手

如何把  ABC_1_DE  替換成   gc_DE.ABC_1=def_ABC_1_DE

也就是說要把最后的橫桿后的DE截出來,并且整個字符串還要接上def_

很急,哪位高手指點一把,萬分感謝!
作者: 怒劍狂嘯    時間: 2005-05-27 08:10
標(biāo)題: 在線求教,如何把一個字符串替換成多個
試試這個吧?還可以再嚴(yán)格些,要根據(jù)你的實際進(jìn)行調(diào)整

  1. $data1="ABC_1_DE";
  2. $data2="gc$&.$`=def_$`$&" if ($data1=~/_\w+$/);
  3. print $data2;
復(fù)制代碼

作者: iwantican    時間: 2005-05-27 10:50
標(biāo)題: 在線求教,如何把一個字符串替換成多個
my $data1="ABC_1_DE";
if ($data1 =~ /_[\d|a-z|A-Z]+$/)
{
        my $data2 = 'gc'.$&.'=def_'.$data1;
        print "$data2\n";
}
作者: iwantican    時間: 2005-05-27 10:59
標(biāo)題: 在線求教,如何把一個字符串替換成多個
\w+包括_的,在這里不好用




歡迎光臨 Chinaunix (http://www.72891.cn/) Powered by Discuz! X3.2