看板 [ Perl ]
討論串[問題] 關於正規表示式
共 6 篇文章
首頁
上一頁
1
2
下一頁
尾頁

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者maxmafiona (努力!!努力!!)時間21年前 (2004/08/20 07:25), 編輯資訊
2
0
0
內容預覽:
程式一開始有定義$urn = maxma123;. 假設有一個XML檔parse進來的字串$urn. $fix = $urn <----注意..是字串喔. 我要對他做賦值的動作,於是用s/\$(\w+)/${$1}/;. print $fix 就可得到maxma123. 現在問題來了又有一個字串$f
(還有175個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者littleshan (我要加入劍道社!)時間21年前 (2004/08/20 10:12), 編輯資訊
0
0
0
內容預覽:
你所需要知道的只是eval函式. 它可以接受一個字串 把字串內容當作程式碼執行. 以下是範例. $urn = 'maxma123';. $str = '$fix = $urn';. eval $str;. print $fix; # print 'maxma123'. $str = '$fix =
(還有40個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者seagal (待救的小米)時間21年前 (2004/08/20 10:13), 編輯資訊
0
0
1
內容預覽:
果然是看不太懂. 你可以試看看. $fix =~ s/chr{(\d+)}/chr(30)/e;. --. http://140.109.73.177/待救的小米.mht. --. 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 140.109.73.177.

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者maxmafiona (努力!!努力!!)時間21年前 (2004/08/21 03:20), 編輯資訊
1
0
0
內容預覽:
首先感謝兩位大大的解答,讓小弟獲益良多,不過小弟還是遇到了困難. 程式如下:. #!/usr/perl/bin/perl. use XML::Simple;. $xs = new XML::Simple();. $ref = $xs ->XMLin('c:\usr\home\ISO2709.xml'
(還有172個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者littleshan (我要加入劍道社!)時間21年前 (2004/08/21 06:16), 編輯資訊
1
0
0
內容預覽:
別忘了這邊. 雙引號會做變數內插. 你可以這樣用. $b = q/$a = $ref -> {'Field'}[1] -> {'Fix'}/;. --. Errors,like straws,upon the surface flow;. He who would search for pearls
首頁
上一頁
1
2
下一頁
尾頁