Сбор состояний PERL (совет нужен)

[mancubus]

Коллеги предположим есть строка массив состояний {idle, start, stop, idle, move, stall}
Как можно создать массив из имеющихся состояний? Пробывал так:

Код: Выделить всё

 sub errco {
    foreach $item (@eve)
          {
           if ($_[0] ne $item)
              {
               push(@tza,$_[0]);
              }
          }

Чёт не выходит каменный цветок. Судя по дебагу при определении массив в undef, туда записывается null, и при сравнении он никогда не появляется, отсюда в массив заносится весь список.

[gcc]

что такое $_[0] ?
анонимный массив?

может быть

Код: Выделить всё

@_[0]

?

если нет, то дайте вывод

Код: Выделить всё

sub errco {
    foreach $item (@eve)
          {
  print @eve \n;
  print $item \n;
   use Data::Dumper;
  print Dumper($_[0]);

           if ($_[0] ne $item)
              {
               push(@tza,$_[0]);
              }
          }

[mancubus]

$_[0] это переменная передаваемя функции. Сейчас попробую задампить. Ход моей мысли правельный вцелом?

[gcc]

в функцию передается массив @_

Код: Выделить всё

@_[0]

это первый элемент

[mancubus]

Натупил ... спасибо за мысль, пойду подкручу.

[pcodr]

в функцию передается массив @_

Код: Выделить всё

@_[0]

это первый элемент

Да ну?
Массив @_ действительно содержит аргументы переданные функции. А как правильно обратиться к элементу массива в perl?
Как раз $_[0] это корректно, а @_[0] - некорректно. Попробуйте запустить такой скрипт с ключем -w, получите сообщение

Scalar value @_[0] better written as $_[0]

А @_[0] - это не элемент массива, а срез массива. Но делать срез из одного элемента смысла мало, обычно пишут что-то вроде @_[0, 3, 6] или @_[0..4] и т.п.

[diesel]

Коллеги предположим есть строка массив состояний {idle, start, stop, idle, move, stall}
Как можно создать массив из имеющихся состояний?

положи их в хэш

типа
my %h;
foreach my $item ( @masssiv_sostoyaniy){
$h{$item} = 1
}
или
map { $h{$_} = 1 } @massiv_sostoyaniy;
map { print } keys %h . "\n";

потом в keys %h окажется список состояний....