آرایه‌ها (Arrays)

آرایه: لیست مرتب

آرایه با سیگیل @ اعلام می‌شود و لیستی از مقادیر را نگه می‌دارد:

my @fruits = ("سیب", "موز", "پرتقال");
my @nums = (10, 20, 30);
my @mixed = (1, "hello", 3.14);     { پرل آزاد است! }
my @empty = ();                      { آرایه خالی }

دسترسی به عناصر — با $!

my @fruits = ("سیب", "موز", "پرتقال");

say $fruits[0];      { سیب — ایندکس از صفر! }
say $fruits[2];      { پرتقال }
say $fruits[-1];     { پرتقال — از آخر! }
say $fruits[-2];     { موز }

تغییر عنصر

$fruits[1] = "کیوی";       { جایگزینی }
$fruits[3] = "انگور";       { افزودن به آخر }

طول آرایه

my @arr = (1, 2, 3, 4, 5);
say scalar @arr;      { 5 — تعداد عناصر }
say $#arr;            { 4 — آخرین ایندکس }

درج آرایه در رشته

my @colors = ("قرمز", "سبز", "آبی");
say "رنگ‌ها: @colors";      { رنگ‌ها: قرمز سبز آبی — با فاصله! }
say "اولین: $colors[0]";   { درج عنصر }

آخرین عنصر

my @arr = (10, 20, 30);
say $arr[$#arr];      { 30 — با آخرین ایندکس }
say $arr[-1];         { 30 — ساده‌تر! }

خلاصه

• @arr کل آرایه، $arr[i] عنصر
• ایندکس از ۰، منفی از آخر
• scalar @arr = تعداد، $#arr = آخرین ایندکس
• "@arr" درج با فاصله