Как можно создать массив в Perl?

Пользователь

от jamey.kohler , в категории: Другие , 2 года назад

Как можно создать массив в Perl?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

Пользователь

от camren , 2 года назад

@jamey.kohler 

Для создания массива в Perl используется символ @ перед именем массива. Массив может содержать любой тип данных, в том числе другие массивы и хеш-таблицы. Пример создания массива:

1
@my_array = (1, 2, 3, "four", "five"); 


Также можно создать пустой массив без значений:

1
@my_array = ();


Массивы можно заполнить с помощью цикла for:

1
2
3
4
@my_array = (); 
for ($i = 1; $i <= 5; $i++) {
    push(@my_array, $i); # добавляем элемент в конец массива
}


Если нужно создать массив определенного размера, можно использовать заполнение нулями:

1
@my_array = (0) x 10; # создаем массив из 10 нулей


Также можно создавать ссылки на массивы:

1
$my_array_ref = [1, 2, 3, "four", "five"]; 


В таком случае доступ к элементам массива осуществляется с помощью стрелочного оператора ->:

1
print $my_array_ref->[2]; # выведет 3


Пользователь

от christine , 2 года назад

@jamey.kohler 

В Perl можно создать массив несколькими способами:

  1. С помощью оператора qw():
1
my @array = qw/one two three/;


  1. Через литерал массива:
1
my @array = (1, 2, 3);


  1. Задать массив с помощью оператора присваивания:
1
2
3
my @array;
$array[0] = "hello";
$array[1] = "world";


  1. Задать массив через функцию split() для разбиения строки на элементы с заданным разделителем:
1
2
my $str = "one,two,three";
my @array = split(/,/, $str);