weidagang2046的專欄

物格而后知致

隨筆 - 8, 文章 - 409, 評論 - 101, 引用 - 0

數(shù)據(jù)加載中……

串形式判斷

已經(jīng)知道一個字符串肯定是某種形式，其中有{0}, {1}, {2}, ... {n}這種形式的[a-z]+。比如給定一種形式"your name is {0}. Hello {0}! my name is {1}"。給出一個串，要求判斷是不是這種形式, 其中{0}處的內(nèi)容必須都是完全相同的串, {1}等也是這樣。

比如對前面的形式，具體串"your name is tom. Hello tom! my name is jack"是該形式，而"your name is tom. Hello jack! my name is tom"則不符合要求。

my $str = "your name is tom. Hello jack! my name is jack";

if($str =~ /your name is ([a-z]+). Hello ([a-z]+)! my name is ([a-z]+)/)

{

if($1 eq $2)

{

print "$str: valid format\n";

}

else

{

print "$str: invalid format\n";

}

else

{

print "$str: nvalid format\n";

}

posted on 2006-03-06 15:20 weidagang2046 閱讀(157) 評論(0) 編輯收藏所屬分類: Perl

新用戶注冊刷新評論列表


只有注冊用戶登錄后才能發(fā)表評論。




網(wǎng)站導航: 博客園 IT新聞 Chat2DB C++博客博問管理
相關(guān)文章: 統(tǒng)計工程的源代碼行數(shù) Perl eval函數(shù)探討如何捕捉CGI程序exception 創(chuàng)建或刪除目錄 Perl Tips 2006/8/19 刪除用通配符匹配的一類文件列出目錄下的所有子目錄和文件名 perl自帶的介紹圖形界面的例子 windows 下的system命令的后臺運行求助 Perl處理Unix命令輸出

weidagang2046的專欄

串形式判斷

導航

常用鏈接

留言簿(12)

隨筆檔案(8)

文章分類(421)

文章檔案(409)

相冊

Link

搜索

最新評論

閱讀排行榜

評論排行榜