*perl

eill 08.02.2013 23:25

по сравнению с perldoc docs.python.org — унылое говно. При всех достоинствах языка, да.

code, python, perl
#tiggig
re1 comment
eill 24.01.2013 09:40

root@voip-nv:/var/log/asterisk/cdr-csv# grep "2012-12" Master.csv | grep ANSWERED | grep '^"","2' | cut -f 10-11 -d ',' | perl -e 'sub gda { return `date --date \"$_[0]\" +%s`; } $c=0; while (<>) { next unless /:\d+","\d+-/; /"(.+)","(.+)"/; $counter += (gda($2) — gda($1)); } print $counter / 3600, ... more →

говнокод, быдло, perl, asterisk, oneliner
#tiifeg
readd comment
Do you really want to delete ?

*perl is used by:

Ky6uk

Ky6uk

Kain Winterheart

kainwinterheart

0verMind

Артс

arts

SirAnthony

SirAnthony

Rayslava

Crazy_Owl

Crazy_Owl

16+

238328

Оранжевус Охуеннус

utros

Mагог Магогович

magog

amd63

amd63

eill

eill

sattellite

sattellite

Nico-izo

Nico-izo

Oleg

NetBUG

jabber

jabber

Minoru

Minoru

rnd_d

rnd_d

analizer

analizer

Няша с няшей

nekoexmachina

cirno

cirno

proton

proton

gelraen

gelraen

Ствол

Dulo_T-34

SilverDragon

SilverDragon

Maxim Kirenenko

part1zano

mva

mva

OpenJDK (как и в общем с первым мая, женское имя

fpsto

nobiiru

nobiiru

Кусаюзаюшко Завушко

kusayuzayushko

Катенька

sociobljad

hleem

hleem

pixie

pixie