vi tl
#!/usr/bin/perl -w
use strict;
$|++;
$|++;
my $host=`/bin/hostname`;
chomp $host;
chomp $host;
while(1) {
open(LOAD,"/proc/loadavg") || die "Couldn't open /proc/loadavg: $!\n";
my @load=split(/ /,<LOAD>);
close(LOAD);
close(LOAD);
print "\033]0;";
print "$host:(아이피) $load[0] $load[1] $load[2] at ", scalar(localtime);
print "\007";
sleep 5;
}
print "$host:(아이피) $load[0] $load[1] $load[2] at ", scalar(localtime);
print "\007";
sleep 5;
}
실행권한 주고
./tl &
./tl &
로그아웃시 종료하기 위해
echo 'killall tl > /dev/null 2>&1' >> /root/.bash_logout
echo 'killall tl > /dev/null 2>&1' >> /root/.bash_logout
게시판 목록
팁게시판
디자인과 관련된 유용한 정보를 공유하세요.
질문은 상단의 QA에서 해주시기 바랍니다.
질문은 상단의 QA에서 해주시기 바랍니다.
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 |
|---|---|---|---|---|
| 127 | 20년 전 | 3391 | ||
| 126 | 20년 전 | 3737 | ||
| 125 | 20년 전 | 8547 | ||
| 124 | 20년 전 | 2614 | ||
| 123 | 20년 전 | 3762 | ||
| 122 | 20년 전 | 3216 | ||
| 121 | 20년 전 | 2610 | ||
| 120 | 20년 전 | 2681 | ||
| 119 | 20년 전 | 2586 | ||
| 118 | 20년 전 | 2867 | ||
| 117 |
 damoa.biz |
20년 전 | 3045 | |
| 116 | 20년 전 | 5311 | ||
| 115 | 20년 전 | 3915 | ||
| 114 | 20년 전 | 4962 | ||
| 113 | 20년 전 | 6229 | ||
| 112 | 20년 전 | 7353 | ||
| 111 | 21년 전 | 18366 | ||
| 110 | 21년 전 | 6832 | ||
| 109 | 21년 전 | 2894 | ||
| 108 | 21년 전 | 4168 | ||
| 107 |
prosper
|
21년 전 | 2483 | |
| 106 |
prosper
|
21년 전 | 4259 | |
| 105 |
아우겐나이스
|
21년 전 | 2916 | |
| 104 | 21년 전 | 2249 | ||
| 103 | 21년 전 | 2477 |
댓글 작성
댓글을 작성하시려면 로그인이 필요합니다.
로그인하기