#!/usr/bin/perl
#package date
($sec, $min, $hour) = localtime (time);
$hour = sprintf ("%2d", $hour);
$hour =~tr/ /0/;
$min = sprintf ("%2d", $min);
$min =~tr/ /0/;
$sec = sprintf ("%2d", $sec);
$sec =~tr/ /0/;
print "$hour".":"."$min".":"."$sec";
pada saat script di atas di jalankan kok jamnya tidak sesuai dgn jam
sekarang ,saya minta pencerahannya ?
--------------------------------------------------------------------------------
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
Pengelola dapat dihubungi lewat [EMAIL PROTECTED]
