使用带卷曲的Awk或Sed进行优化

Question

我有一个文件url，输出如下：

//
data = {
    'ip': '',
    'server_ip': '',
    'router_name': 'Banana Hammock',
    'wan_domain': '',
    'wan_gateway': '74.125.224.32',
    'wan_gateway_get': '74.125.224.32',
    'wan_get_domain': 'isp.example.com',
    'wan_hostname': 'MumbaVille',
    'wan_hwaddr': '00:00:00:00:00:00',

我使用这个命令来获取wan_gateway_get：

curl -k http://mumbarouter.com/get.asp?statits | awk '/wan_gateway_get/ {print $2}'

以下哪项输出：

'74.125.224.32',
=

我怎么才能让它只输出：

74.125.224.32

谢谢，祝mumba快乐！

Answer 1

Make it easy on yourself ...因为分手是很容易做到的：

curl -k http://mumbarouter.com/get.asp\?statits |
  awk -F\' '/wan_gateway_get/ {print $4}'

Answer 2

以下是

awk '/wan_gateway_get/ {match($2, "[0-9]+\\.[0-9]+\\.[0-9]+\\.[0-9]+"); print substr($2,RSTART,RLENGTH)}'

是一种可能的方法。

Answer 3

TXR解决方案:对实际语法进行自由形式的解析。(强制右大括号已添加到示例数据中。)

@(define comment)//@nil@\n@(end)
@(define ws)@(cases)@(comment)@(or)@/\s*/@(end)@(end)
@(define id (id))@(ws)@{id /\w[\w\d_]+/}@(ws)@(end)
@(define item (it))@(ws)'@{it /[^']+/}'@(ws)@(end)
@(define braced_key_values (ithash))@\
  {@(coll)@(item key):@(item value)@(until)}@(end)}@\
  @(bind ithash @(progn '#H((:equal-based) ,*[mapcar list key value])))@\
@(end)
@(freeform)
@(id config)@(ws)=@(ws)@(braced_key_values config-hash)
@(output)
wan_gateway in configuration "@config" is @[config-hash "wan_gateway"]
@(end)

运行：

$ txr data.txr data.txt
wan_gateway in configuration "data" is 74.125.224.32