C:\>perl -c ag2gen.pl "my" variable $i masks earlier declaration in same statement at ag2gen.pl line 1391. "my" variable @test_order masks earlier declaration in same scope at ag2gen.pl line 1391. "my" variable @test_order masks earlier declaration in same statement at ag2gen.pl line 1393. "my" variable $i masks earlier declaration in same statement at ag2gen.pl line 1393. "my" variable @test_order masks earlier declaration in same statement at ag2gen.pl line 1393. "my" variable $j masks earlier declaration in same statement at ag2gen.pl line 1393. "my" variable %test_order masks earlier declaration in same scope at ag2gen.pl line 1394. "my" variable @test_order masks earlier declaration in same statement at ag2gen.pl line 1394. "my" variable $i masks earlier declaration in same statement at ag2gen.pl line 1394. "my" variable @test_order masks earlier declaration in same statement at ag2gen.pl line 1394. "my" variable $j masks earlier declaration in same statement at ag2gen.pl line 1394. syntax error at ag2gen.pl line 1389, near "2]" ag2gen.pl had compilation errors. #### 1389: for my $i (0..@test_order-2]) 1390: { 1391: for my $j ($i+1..@test_order-1) 1392: { 1393: unless ( ( $test_order[$i] eq $test_order[$j] ) 1394: or exists($test_order{"$test_order[$i]\t$test_order[$j]"} ) )