آرایه ها

تا کنون برای مقدار دهی از توابع استفاده می کردیم ولی از این پس می خواهیم با ساختار دیگر آشنا شویم که به آن Array می گویند . ارایه بر خلاف متغییر ها دارای چندین عنصر است و می توان که هر عنصر می تواند محتوی مقدار باشد ، هر عنصر را می توان با یک اندیس از دیگری جدا کرد . (اندیس شماره ای شناسائی عنصر در array می باشد.)

شاید در عمل سخت به نظر بیاد ولی یاد گرفتن اون راحتتر و بهتر از به کار بردن ان است . در زیر برنامه Hello World رو با array نوشته شده است توجه فرمائید .

در زیر برنامه ای Hello World با ساختار آرایه نوشته شده است با هم به آن توجه می کنیم :

#!/usr/bin/perl –w

@Hello=(‘hello’.’world’);

Print Join(‘ ‘.@Hello) . “\n”;

این یک مثال بود با دومقدار همان طور که می بینید Array با @ آغاز می شود و مقادیر در داخل () قرار می گیرد که هر مقدار به تنهائی در ‘ و یا “ بنا به کار برد برنامه نویس قرار می گیرد و هر مقدار هم با , از یکدیگر جداسازی می شوند ، عنصرها (مقدارها) به در این آرایه برابر با hello و world هستند . به یک مثال دیگر توجه کنید این خیلی ساده تر است :

#!/usr/bin/perl –w

@Names=(‘Siroos’,’Backpacker’.’N0t_F0und’.’AliAkbar’);

   Print @Names;

در آرایه ای به نام @Names از 4 عنصر استفاده شده است که به ترتیب عبارتند از : Siroos و Backpacker و N0t_F0und و در آخر هم AliAkbar است حالا در پایین به نوع شماره گذاری ( اندیس ) ها می پردازیم که چگونه یک عنصر را از ارایه استفاده کنیم . به شکل زیر توجه کنید :

    0                     1                     2                    3

Siroos            Backpacker      N0t_F0und        AliAkbar

اندیس هرعنصر در بالای آن نوشته شده است ولی چگونه در برنامه استفاده کنیم برای این کار باید اسم آرایه را نوشته سپس شماره ای آن را در داخل [] بنویسید به شکل زیر توجه کنید :

@Names       $Names[0]        $Names[1]       $Names[2]        $Names[3]

                      Siroos            Backpacker       N0t_F0und         AliAkbar

برای اینکه یک مثال عملی رو ببینید به مثال زیر توجه کنید  :

#!/usr/bin/perl -w

@Names=(‘Siroos’,’Backpacker’,’N0t_F0und’,’AliAkbar’,’AliAkbar’);

Print $Names[1];

در مثال بالا فقط مقدار Backpacker چاپ می شود به نحوه ای استفاده از اندیس در این مثال توجه فرمائید .

روشهای زیادی برای فراخوانی توابع وجو دارد که در این بخش از آن صرف نظر می کنیم . البته شما می توانید برای مطالعه بیشتر می توانید به کتاب Perl Programming مراجعه کنید .