TCL - 파일에서 IP 주소 검색

다른 IP 주소가 많이 들어있는 파일이 있습니다. 내가해야 할 일은 이러한 IP 주소를 찾아서 변수 나 목록 또는 파일에 넣어 나중에 더 많은 작업을 수행 할 수 있도록하는 것입니다.TCL - 파일에서 IP 주소 검색

는 내가 IP 주소 찾기 위해이 정규 표현식이 있습니다

% set ip [open subnets.txt r] 
% set sub [read $ip] 
% regexp {(?:\d+\.){3}\d+(\/)([0-9]+)} $sub a

을하지만 그것은 단지 나에게 파일의 첫번째 IP 주소를 제공합니다.

누구든지 나에게 더 나은 해결책을 제공 할 수 있습니까? 너무 많은

감사

의 몇 가지를 놓치고있어 (? :. \ D {1,3} \) {3} \ d {1,3} (\ /) ([0-9] +)'를 RE로 사용하십시오. IP 주소를 쓰는 모든 방법이나 IPv4 주소를 쓰는 모든 방법을 처리하지는 않지만 너무 많이 읽지는 않습니다. –

당신은 당신이`와 아마 더 좋을 것 같아 options

set addresses [regexp -all -inline {(?:\d+\.){3}\d+/[0-9]+} $sub]

2013-11-24 04:00:22

답변