Timer di Perl

Ini aku buat, soale kemarin bingung mencari fungsi timer di perl, di perl ada fungsi timer yang di namakan sleep ( ); tapi waktu aku jalanin kurang bekerja dengan baik, jadi terpaksa deh di akal-akalin he.. he.. he..

#!/usr/sbin/perl —

#Asumsi disini sudah banyak script perl…

print “L4dy\n”;

#Timer Untuk Perl…
#——————————my $now = time;
$now+=5;
while ( $now > time ) {}
#——————————
print “J0h4n”;
#Asumsi disini sudah banyak script perl…

..”..Blogging : Programing..”..

2 Responses to “Timer di Perl”

  1. ario Says:

    pake PHP kenapa tidak

  2. j0h4n_r4j Says:

    PHP Ok… PERL juga Ok…, tapi gue penasaran ama Rubi sekarang…

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s