Установка Avahi на FreeBSD - демон не запускается
perl -lne 'BEGIN{*1 = sub {print q<{>, join(",\n", splice @A, 0, @A), q<}>}}
next if $. == 1;
/^\[(?:\d+,?)+\]\d+$/ and &1,next;
push @A, join q/ : /, map qq/"$_"/, split /=/;
eof && &1;
' yourfile
0
Darwin von Corax
01.05.2016, 08:27
Ссылка
0 ответов