{"id":11,"date":"2008-10-03T09:19:00","date_gmt":"2008-10-03T09:19:00","guid":{"rendered":"http:\/\/www.vcrini.com\/impressioni\/?p=11"},"modified":"2008-10-03T09:19:00","modified_gmt":"2008-10-03T09:19:00","slug":"perl-oneliner","status":"publish","type":"post","link":"https:\/\/www.vcrini.com\/impressioni\/?p=11","title":{"rendered":"Perl Oneliner"},"content":{"rendered":"

Talvolta mi capitano log del tipo:<\/p>\n

2008-10-03 09:28:55,204 [10544] Dada::Rufus INFO final status: @101: uid:’+919791100668′ appid:’122301909010729816767′ : ‘book’ -> ‘ACK’ in 1.120 s.<\/span>
2008-10-03 09:28:56,320 [9779] Dada::Rufus INFO final status: @56: uid:’+557988275004′ appid:’122301908814163698835′ : ‘book’ -> ‘NACK’ in 4.345 s.<\/span>
2008-10-03 09:28:57,572 [10551] Dada::Rufus INFO final status: @101: uid:” appid:’122301909010729816767′ : ‘capture’ -> ‘NACK’ in 2.106 s.<\/span><\/p>\n

supponiamo che voglia sapere quali diversi tipi di occorrenza del tipo ‘@…’ ci siano.<\/p>\n

In questo caso \u00e8 semplice perch\u00e9 ce ne sono 2<\/p>\n

@101 e @56<\/p>\n

ma se il log \u00e8 lungo parecchie centinaia di mega la cosa non \u00e8 semplice.<\/p>\n

Questa cosa, con le coreutils di linux si possono compiere velocemente, ancor pi\u00f9 velocemente usando perl<\/span>.<\/p>\n

per estrarre dalle righe le varie etichette eseguo per da riga di comando facendo tornare con un’espressione regolare le parole che iniziano con ‘@’:<\/p>\n

perl -ne ‘ print “$1\\n” if ($_=~\/@(\\w+)\/)’<\/p>\n

quindi supponendo che queste righe siano nel mio file di log utilizzo<\/p>\n

cat filelog| perl -ne ‘ print “$1\\n” if ($_=~\/@(\\w+)\/)’<\/p>\n

per\u00f2 cos\u00ec facendo ottengo una serie di<\/p>\n

@101
@56
@101
@…<\/p>\n

io voglio conoscere le occorrenze uniche e per questo ecco 2 utilit\u00e0 che tornano alla mano sort<\/span> e uniq<\/span><\/p>\n

quindi il mio comando diviene<\/p>\n

perl -ne ‘ print “$1\\n” if ($_=~\/@(\\w+)\/)’ | sort | uniq<\/p>\n

e ottengo la lista di occorrenze uniche ricercata<\/p>\n

N.B. per ottenere questo risultato non \u00e8 necessario ricorrere al perl infatti spesso viene utilizzato awk. Per me l’utilizzo di awk se non per le cose pi\u00f9 semplici \u00e8 molto criptico e, conoscendo perl, preferisco utilizzarlo al suo posto.<\/p>\n","protected":false},"excerpt":{"rendered":"

Talvolta mi capitano log del tipo: 2008-10-03 09:28:55,204 [10544] Dada::Rufus INFO final status: @101: uid:’+919791100668′ appid:’122301909010729816767′ : ‘book’ -> ‘ACK’ in 1.120 s.2008-10-03 09:28:56,320 [9779] Dada::Rufus INFO final status: @56: uid:’+557988275004′ appid:’122301908814163698835′ : ‘book’ -> ‘NACK’ in 4.345 s.2008-10-03 09:28:57,572 … Continua a leggere→<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_mi_skip_tracking":false},"categories":[14,16,10,17,15],"tags":[],"_links":{"self":[{"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=\/wp\/v2\/posts\/11"}],"collection":[{"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=11"}],"version-history":[{"count":0,"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=\/wp\/v2\/posts\/11\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=11"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=11"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.vcrini.com\/impressioni\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=11"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}