Членопостроитель на основе uptime


ramok аватар

ramok - Posted on 24 Декабрь 2006

Просто незаменимый однострочкик на перле, для тех кто любит мерятся аптаймами Ж:-)

unido22pts/0~% uptime | perl -ne "/(\d+) d/;print 8,q(=)x\$1,\"D\n\""
8================================================================================
=================================================================================
=================================================================================
=================================================================================
=======================D
unido23pts/0~%

Версия для awk

$ uptime|awk '{while($3--)a=a"=";print 8a"D"}'
0
Ваша оценка: Ничего

линуксо ядрёный варинат оного http://marc.info/?l=linux-kernel&m=107236408702573&w=2
спасибо товарищу Stilleto@RusNet#linux Ж:-)

Сначала бросилась делать эту фичу. Вовремя одумалась....

Не существует таких проблем, которые человек не может сам себе создать.

[uid@partizan uid]$ echo -n 8;for i in `seq 1 $(uptime |awk '{print $3}')`;do echo -n =;done;echo D

awk с этим самотоятельно справится может
uptime | awk '{i=$3;while(i--)a=a"=";print"8"a"D"}'
ps
интересный примемчик в `` использовать $() если надо. снкс, запомним Ж:-)
--
Signature invent in progress 22% #.........

эх.. нет в жизни совершенства. вот еще более короткая версия на awk.
uptime|awk '{while($3--)a=a"=";print 8a"D"}'
--
Signature invent in progress 22% #.........

ну приехали... подарок новогодний ;)

:-)))))

Отправить комментарий

Google Friend Connect (leave a quick comment)
loading...
Содержание этого поля является приватным и не предназначено к показу.