Showing posts with label perl. Show all posts
Showing posts with label perl. Show all posts

Friday, June 15, 2007

PERL Operator


PERL – Operator Aritmatik

Opertor aritmatik digunakan untuk perhitungan. Operasi aritmatik yang dapat dilakukan oleh PERL: penambahan, pengurangan, perkalian, pembagian, eksponen dan mod (sisa bagi).

PERL – Operator Aritmatik

Opertor aritmatik digunakan untuk perhitungan. Operasi aritmatik yang dapat dilakukan oleh PERL: penambahan, pengurangan, perkalian, pembagian, eksponen dan mod (sisa bagi).

 

PERL Arithmetic:

file arithmatic.pl

#!/usr/bin/perl


print "Content-type: text/html\n\n";
print "Operator aritmatika<br>";
$a=3;
$b=2;
$tambah=$a + $b;
$kurang=$a - $b;
$kali=$a * $b;
$bagi=$a / $b;
$pangkat=$a ** $b;
$sisa=$a % $b;

print "a = ". $a." dan b = ".$b;
print "<br>

$tambah<br>
$kurang<br>
$kali<br>
$bagi<br>

$pangkat<br>
$sisa<br>";

keluaran arithmatic.pl:


Operator Aritmatika
a = 3 dan b = 2
5
1
6
1.5
9
1

Arithmetic Operators:



Operator

Contoh

Hasil

Keterangan

+

7 + 7

= 14

Penambahan

-

7 - 7

= 0

Pengurangan

*

7 * 7

= 49

Peralian

/

7 / 7

= 1

Pembagian

**

7 ** 7

= 823543

Pangkat

%

7 % 7

= 0

Sisa Bagi

PERL – Assingment Operator

Assingment operator digunakan untuk menetapkan variabel misalnya $ x = 5.Penggunaan assingment operator digunakan juga untuk perhitungan.Setiap kali melakukan operasi operator assingment memegang variabel nilai baru.Contoh :

PERL ssignment:

#!/usr/bin/perl

print "content-type: text/html \n\n"; #the header
$x = 5; #the variable

print 'Our $x plus 10 is '.($x += 10);
print "<br />$x is our new variable value";
print '<br />Our $x minus 3 is '.($x -= 3);

print "<br />$x is our new variable value";
print '<br />Our $x times 10 is '.($x *= 10);
print "<br />$x is our new variable value";
print '<br />Our $x divided by 10 is '.($x /= 10);

print "<br />$x is our new variable value";
print '<br />the remainder of Our $x divided by 10 is '.($x %= 10);
print "<br />$x is our new variable value";
print '<br />Our $x to the tenth power is '.($x **= 10);
print "<br />$x is our new variable value";

setiap kali operator assignment menyimpan nilai suatu variabel akan merubah secara permanen variabel tersebut ($x)

assignments.pl:

Our $x plus 10 is 15
15 is our new variable value
Our $x minus 3 is 12
12 is our new variable value
Our $x times 10 is 120
120 is our new variable value

Our $x divided by 10 is 12
12 is our new variable value
the remainder of Our $x divided by 10 is 2
2 is our new variable value
Our $x to the tenth power is 1024
1024 is our new variable value

Assignment Operators:

perator

Definisi

Contoh

+=

Penjumlahan

($x += 10)

-=

Pengurangan

($x -= 10)

*=

Perkalian

($x *= 10)

/=

Pembagian

($x /= 10)

%=

Sisa pembagian

($x %= 10)

**=

Eksponensial

($x **= 10)

++Penambahan dengan 1 ($x++)
--Penguranagan dengan 1 ($x--)

PERL - Operator Logika & Relational

Operator penghubung menghubungkan suatu variable dengan variable lainnya, untuk contoh 5 < 12 ini digunakan untuk menghubungkan persamaan atau bukan persamaan dari dua atau lebih variabel, bisa berupa sebuah data string atau numeric.


Operator logika penghubung status and/or. Artinya, anda dapat mengambil dua variabel dan memeriksa keduanya atau mengujinya. Operator logika digunakan kemudian didalam kondisional dan pengulangan. Perhatikan contoh – contoh dibawah.

Operator Logika/ Relational:

Relational
























Operator

Contoh

Definisi

Hasil

==, eq

5 == 5
5 eq 5

Test: Apakah 5 sama dengan 5?

True

!=, ne

7 != 2
7 ne 2

Test: Apakah 7 tidak sama dengan 2?

True

<, lt

7 < 4
7 lt 4

Test: Apakah 7 kurang dari 4?

False

>, gt

7 > 4

7 gt 4

Test: Apakah 7 lebih dari 4?

True

<=,le

7 <= 11

7 le 11

Test: Apakah 7 kurang dari atau sama dengan 11?

True

>=, ge

7 >= 11

7 ge 11

Test: Apakah 7 lebih dari atau sama dengan 11?

False


Logika
















Operator

Definisi

Contoh

&&,and

Menghubungkan dua variable dengan AND

if (($x && $y) == 5)...

||,or

Menghubungkan dua variable dengan OR

if (($x || $y) == 5)...


Operator logika biasa digunakan jika anda akan membuat program yang membutuhkan kondisi dari program yang akan anda buat, dan ini adalah dasar dari semua bahasa pemrograman, sehingga dengan penguasaan yang baik pada operator logika kemungkinan Anda akan lebih mudah dalam membuat program/aplilkasi yang baik dan terstruktur.




Technorati Profile

Wednesday, May 30, 2007

Aturan PERL - Perl Tutorial

PERL – Header HTTP
Karena kita sedang bekerja dalam Web. Kita harus mengenal HTTP. Sehingga PERL dapat dikerjakan di Web. Untuk itu perlu digunakan kode-kode agar dapat memanggilnya di HTTP.Contoh :
firstscript.pl:
#!/usr/bin/perl

print "content-type: text/html \n\n";


Sampai saat ini yang telah sibuat adalah baris perl Intrepeter . Baris untuk pengenalan di HTTP agar dapat mengerjakan PERL dalam PERL juga sudah di buat.

PERL - Hello, PERL! Script
Setelah membuat kedua baris dia atas. Barulah teks dapat di cetak di Web.
helloperl.pl:
#!/usr/bin/perl

print "content-type: text/html \n\n";

print "Hello, PERL!";

Maka hasil nya adalah Hello, PERL! Di dalam Web. Langsung dan sederhana.




PERL -Menjalankan Program
Saat nya megupload program.pl kedalam Web server dan menjalankannya. Setelah mengupload pastikan untuk hak akses user dapat melakukan eksekusi untuk memberikan hak akses guakan perintah chmod program biasanya dengan 755.

PERL - Debugging Program

Jika menggunakn FTP untuk mengupload program harus disertai dengan ASCII. Gunanya agar tidak terdapat karakter aneh akibat meng-Copi ke system operasi yang berbeda.
Teknik lain yang tak kalah hebatnya adalah mengisolasi kode yang sedang digunakan. Dapat di lakukan dengan megisolasi bagian yang Error saja.

PERL – Syntak

PERL meggunakan sintak yang sangat spesifik yang sangat penting untuk menghindari kesalahan atau kegagalan delam men-debugging kode-kode.

PERL Nama File
Skrip perl dapat dibuat dalam program teks editor yang sederhana. Ada beberapa program yang tersedia untuk tiap-tiap jenis platform. Ada banyak program yang dirancang untuk para programer yang dapat di download dalam Web.
Dengan mengabaikan program yang telah dipilih, file perl harus di beri nama dengan a.pl (.PL) agar dikenali sebagai skrip dalam PERL. Nama file bisa dengan angka, lambang, dengan catatan tidak menggunakan space/spasi. Gunakan garis bawah sebagai pegganti space/spasi.

Contoh PERL:
my1stPERLscrtip.pl
1st_PERLscript.pl


PERL - Komentar
Seperti bahasa program lainnya, PERL menawarkan penulisan komentar dengan tanda #. Apapun termasuk kata, spasi, lambang, angka akan diabaikan oleh program. Program yang baik selalu memberikan tempat untuk komentar yang dapat membantu dalam penjelasan program yang dibuat, ini merupakan cara yang baik agar kode atau skrip yang dibuat dapat di mengerti orang. Komentar sangat penting jika ingin menunjukkan kepada orang banyak.

PERL Comment:
#!/usr/bin/perl

print "Content-type: text/html \n\n"; # the header
#########################################
#Comments start with a #
#########################################

Contoh diatas mungkin sering dilihat ketika mendownload dari web.

PERL – Skrip pertama

Program pertama kita adalah untuk mencetak “Hello, World!”, walaupun sangat sederhana tapi bagus untuk permulaan. Buat kode dan document teks baru dengan teks editor kemudian di simpan dengan nama a.pl. Perhatikan sejak kita meggunakan/menjalankan program dalam Web browser dan jangan lupa tambahkan “header” agar dapat diketahui kita menggunakan Web.

:
#!/usr/bin/perl

Suatu header harus terdapat di dalam skrip PERL sebagai ciri modul yang digunakan untuk keseluruhan skrip. Sejak kita menfokuskan ke aplikasi Web PERL. Header tersebut tidak akan berubah dalam tutorial ini, kecual kita menggunakan modul CGI nantinya.

PERL Header:
#!/usr/bin/perl

print "Content-type: text/html \n\n"; # ini adalah header untuk aplikasi web

Header harus diikuti dengan karakter (\n).yang merupakan syaratnya

PERL Code:
#!/usr/bin/perl

print "Content-type: text/html \n\n"; # the header
print "Hello, World!";

Display:
helloworld.pl
________________________________________

Hello, World!

Skrip yang dibuat akan ditampilkan dalam dokumen HTML, dengan demikian kita juga dapat membuat kode HTML di dalam PERL
Perlu diingat yang tidak kalah pentingnya adalah untuk Men-CHMOD program perl yang sudah dibuat dengan 755 yang memberikan akses kepada semua user untuk menjalankan dan membaca program.

PERL – Karakter Escaping
Dalam PERL kita menggunakan backslash untuk karakter spesial. Karakter escape digunakan jika kita memakai lambang dollar ($) tanda (@) dan tanda petik (’).Lambang dollar dapat diartikan sebagai variabel sedangkan tanda @ diartikan sebagai array. Untuk itu digunakan tanda backslash untuk mencetak karakter ini.

Kode PERL:
#!/usr/bin/perl

print "Content-type: text/html \n\n"; # the header
$string = "David paid \$4.34 for Larry\'s shirt.";
$email = "youremail\@youremail.com";
print "$string
";
print "$email
";
print '$string and $email';
Display:
escape.pl
________________________________________

David paid $4.34 for Larry's shirt.
youremail@youremail.com
$string and $email

diterjemahkan dan diedit dari tizag.com

Pengenalan PERL - Perl Tutorial

(Wikipedia) Perl adalah bahasa pemrograman untuk segala keperluan, dikembangkan pertama kali oleh Larry Wall di mesin Unix. Perl dirilis pertama kali pada tanggal 18 Desember 1987 ditandai dengan keluarnya Perl 1. Pada versi-versi selanjutnya, Perl tersedia pula untuk berbagai sistem operasi varian Unix (SunOS, Linux, BSD, HP-UX), juga tersedia untuk sistem operasi seperti DOS, Windows, PowerPC, BeOS, VMS, EBCDIC, dan PocketPC. Dukungan terhadap pemrograman berbasis obyek (object oriented programming/OOP) ditambahkan pada Perl 5, yang pertama kali dirilis pada tanggal 31 Juli 1993. Proyek pengembangan Perl 6 dimulai pada tahun 2000, dan masih berlangsung hingga kini tanpa tanggal yang jelas kapan mau dirilis. Ini dikatakan sendiri oleh Larry Wall[1] dalam satu pidatonya yang dikenal dengan seri The State of the Onion.

(Wikipedia) Dua di antara karakteristik utama Perl adalah penanganan teks dan berbagai jalan pintas untuk menyelesaiakn persoalan-persoalan umum. Tidak heran jika Perl sangat populer digunakan dalam program-program CGI (Common Gateway Interface) dan berbagai protokol Internet lainnya. Seperti diketahui, TCP/IP sebagai basis bagi semua protokol Internet yang dikenal sekarang ini menggunakan format teks dalam komunikasi data. Seperti juga bahasa populer lainnya, Perl menerima banyak kritikan. Meski banyak di antaranya hanya berupa mitos, atau berlebih-lebihan, tapi terdapat juga sejumlah kritikan yang valid. Salah satunya adalah, sintaksnya susah dibaca, karena banyak menggunakan simbol-simbol yang bukan huruf dan angka.

Monday, March 26, 2007

Script pertama perl

Ini adalah artikel yang pertama dalam blog ini tentang pemrograman, disini akan saya bahas bagaimana menjalankan script perl di mesin linux/unix, yang saya gunakan adalah server linux Debian, yang sudah terinstall perl V 5.8.4.
Sebelum memulai kita cek dulu apakah sistem sudah terinstall perl atau belum, untuk melihatnya gunakan perintah


#perl -v


---> # adalah shell console pada system
jika sudah terinstall akan muncul tampilan sebagai berikut:
---------------------------------------------------------------------------

This is perl, v5.8.4 built for i386-linux-thread-multi

Copyright 1987-2004, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'. If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.

---------------------------------------------------------------------------
anda dapat mendownload perl dari http://www.cpan.org

Untuk memulai script perl, kita harus mengetahui terlebih dahulu letak dari program perl, dengan mengetikan perintah:

#whereis perl
perl: /usr/bin/perl /etc/perl /usr/lib/perl /usr/local/lib/perl /usr/share/perl /usr/share/man/man1/perl.1.gz

dari output di atas berari progran perl berada di /usr/bin/perl

dengan menggunakan editor kesukaan anda buat script perl sebagai berikut:


#!/usr/bin/perl

print "Hello World\n";


simpan script di atas dengan nama hello.pl

Setelah itu ubah mode filenya menjadi file executeable, dengan menggunakan perintah chmod,


#chmod +x hello.pl


atau


#chmod 755 hello.pl


jalankan script diatas :


#./hello.pl
Hello World


Selamat mencoba!!!