1. Пишем по-русски. Кнопочка translit->rus тебе поможет в этом.
2. Описание ошибки и возможно решение нужно искаить в perldoc perldiag
3. у тебя в условии for каша. через пол года сам не разберешся.
Я бы написал:
#!/usr/bin/perl
use strict;
my @path = (1,2,3,4,5,6,7);
my @linking = (1,2,3,4);
my $array_delta = $#path-$#linking;
my $q=$#path;
my $j=0;
for ($q>=$array_delta, $j<=$#linking)
{
$q--;
$j++;
print "$q -- $j\\n";
}
