[問題] 有關搜尋的問題

看板Perl作者 (另一個西普)時間19年前 (2006/05/29 17:13), 編輯推噓0(002)
留言2則, 1人參與, 最新討論串1/2 (看更多)
127.0.0.1 - - [20/Jan/2006:12:17:19 +0800] "GET /~ckhung/ HTTP/1.1" 200 8321 "-" "Mozilla/5.0 (X11; U; Linux i686; zh-TW; rv:1.8) Gecko/20051111 Firefox/1.5" 127.0.0.1 - - [20/Jan/2006:12:19:18 +0800] "GET /~ckhung/ HTTP/1.1" 200 8321 "-" "Mozilla/5.0 (X11; U; Linux i210.71.85.66 - - [20/Jan/2006:12:00:14 +0800] "GET / HTTP/1.0" 200 6982 "-" "-" 127.0.0.1 - - [20/Jan/2006:12:17:19 +0800] "GET /~ckhung/ HTTP/1.1" 200 8321 "-" "Mozilla/5.0 (X11; U; Linux i686; zh-TW; rv:1.8) Gecko/20051111 Firefox/1.5" 127.0.0.1 - - [20/Jan/2006:12:19:18 +0800] "GET /~ckhung/ HTTP/1.1" 200 8321 "-" 686; zh-TW; rv:1.8) Gecko/20051111 Firefox/1.5" 我如果有這些資料,而我只想要找到所用的是什麼browser的話我該怎麼寫? 我現在的問題是,不知道怎麼找後面的資料,不知道從何下手,如果是在最前 面的話,我還行,但是中間跳過一堆東西我就不會了@@" #!usr/bin/perl -w use strict; while (<>){ print "$1\n" if( $_ =~ m/(\d+(\.\d+)(\.\d+)(\.\d+))/) }; 我寫到這樣而已… 請大大幫忙 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.223.211.253

05/31 01:53, , 1F
試試 /\s+(\S+\/\S+)"$/
05/31 01:53, 1F

05/31 01:55, , 2F
你老師有講 要注意聽~
05/31 01:55, 2F
文章代碼(AID): #14Uhj2E7 (Perl)
文章代碼(AID): #14Uhj2E7 (Perl)