সম্পাদনা
my @fruits = ("আপেল", "আঙ্গুর", "কমলা", "কলা"); for (my $item = 0; $item < @fruits; $item++) { print $fruits[$item] . "\n"; }
পূর্বরূপ
