Membuat Shutdown Timer di linux (bash & perl script inside)

yap.. terkadang untuk kita yang sering lembur.. entah lembur karena kerjaan ato hanya sekedar ngaskus dan sebagai macamnya.. hehe.. apalagi kalo sambil download.. yah,, nampaknya tidak efisien sekali kalo kita sedang download dan ditinggal tidur.. lah,, kalo downloadnya selesai? komputer nyala terus donk? ga hemat listrik dan mengurangi daya tahan terhadap notebook. ada baiknya kita mencoba script shutdown timer.. gunanaya?? ya untuk memperkirakan berapa menit lagi komputer kita shutdown? oke.. langsung saja tanpa basa basi.. pertama gw coba pake bash script ^_^ :
1. bikin sebuah file dengan editor kesayangan anda misalnya : timer.sh (sebaiknya langsung kefolder yang aman saja.. contohnya saya simpan di /opt)
RIOT-familys-UBUNTU:~ dhymazspyro$ sudo nano /opt/timer.sh
2. copas script dibawah ini :
#!/bin/bash
echo -n “masukkan waktu untuk turn off (hh:mm)= ”
read WAKTU
shutdown -h $WAKTU
3. simpan file tersebut.. dan ubah permission untuk eksekusi :
RIOT-familys-UBUNTU:~ dhymazspyro$ sudo chmod +x /opt/timer.sh
4. untuk menjalankan, cukup dengan perintah ini :
RIOT-familys-UBUNTU:~ dhymazspyro$ sudo ./timer.sh
nah itu contoh simplenya.. kalo mau dibuat GUI juga silahkan… ^^
berikut ini ada tambahan script yang dibuat dengan perl.. thankz for rajiva
for perl :
#!/usr/bin/perl
#———————————————————–#
# #
# auto shutdown program – 26 Mei 2010 #
# @author rajiva.root@gmail.com – http://srandal.com #
# #
#———————————————————–#use strict;
use warnings;if($< != 0){ die "You need higher previladge to run this program!"; }
my ($timer,$timer_tmp,$str);
$timer=0;if($#ARGV < 0){
$timer = 30;
} else {
$timer = $ARGV[0];
if($timer =~ /[^0-9]/){
die "Timer must in digit and bigger then 0.";
} else { if($timer eq 0){ die "Timer must in digit and bigger then 0."; } }
}$timer_tmp = $timer;
$timer = 60 * $timer;print "System will shutdown in ".convertTime($timer_tmp)."\n";
print "Press Ctrl + C to quit from this program.\n";for(my $i=0;$i<(($timer/60)-1);$i++){
print "".convertTime($timer_tmp)." remaining time before auto shutdown.\n";
sleep(60);
$timer_tmp--;
}print "Only 1 minute remaining time before auto shutdown.\n";
for(my $i=60;$i>0;$i–){ print $i.” second.\n”; sleep(1); }print “Time is over. System will shutdown immediatly.\n”;
system(“halt”);sub convertTime{
my $timer = $_[0];
if($timer > 60){
$str = int($timer/60).” hours”.($timer%60==0? “”: ” “.($timer%60).” minute”);
} else { $str = $timer.” minute”; }
return $str;
}
dan tunggu apa lagi?? saya tunggu kreasi anda untuk membuat GUI nya
hehe.. berhubung ane ga bisa buat untuk panggil memanggilnya GTK2an dan apalah.. hehe..
ngeliat verri n budi ngobrol tentang itu ajah mumet gw.. :p males nyobanya.. hehe :p
versi perl’a kok bda ama bash’a???
yg bash :
RIOT-familys-UBUNTU:~ dhymazspyro$
yg perl :
# @author rajiva.root@gmail.com – http://srandal.com #
??????????????????????????????????????????????????
wakakak…
eniwe…mantap gaaaaaaaannn….
lnjutkan!!!!!
June 22, 2010 at 7:55 am
asem -___-”
yang perl aq gak dong..
June 22, 2010 at 11:24 am
hayoo sapa yang bisa bkin dari C language.. hehe
June 22, 2010 at 2:49 pm
pakek zenity aja, lebih gampang bikin yang versi GUInya. Tanya si syafii no, yang dah diajarin..
November 3, 2010 at 4:48 am