Ideone.com

fork download

copy

#!/usr/bin/perl
use strict;
use warnings;
 
# Cuenta-números.
# El programa, al recibir como datos un arreglo unidimensional de tipo
# entero y un número entero, determina cuántas veces se encuentra el
# número en el arreglo.
 
my $I;                    # Declaración de la variable I
my $NUM;                  # Número a buscar
my $CUE = 0;              # Contador de coincidencias
my @ARRE;                 # Declaración del arreglo
 
# Lectura de los elementos del arreglo
for ($I = 0; $I < 100; $I++) {
    print "Ingrese el elemento ", $I + 1, " del arreglo: ";
    chomp($ARRE[$I] = <STDIN>);  # Lectura del arreglo y quitar el salto de línea
}
 
# Lectura del número a buscar
print "\n\nIngrese el número que se va a buscar en el arreglo: ";
chomp($NUM = <STDIN>);
 
# Comparación del número con los elementos del arreglo
for ($I = 0; $I < 100; $I++) {
    if ($ARRE[$I] == $NUM) {
        $CUE++;
    }
}
 
# Mostrar el resultado
print "\n\nEl número $NUM se encuentra $CUE veces en el arreglo\n";

Success #stdin #stdout #stderr 0.01s 5520KB

stdin

copy

Standard input is empty

stdout

copy

Ingrese el elemento 1 del arreglo: Ingrese el elemento 2 del arreglo: Ingrese el elemento 3 del arreglo: Ingrese el elemento 4 del arreglo: Ingrese el elemento 5 del arreglo: Ingrese el elemento 6 del arreglo: Ingrese el elemento 7 del arreglo: Ingrese el elemento 8 del arreglo: Ingrese el elemento 9 del arreglo: Ingrese el elemento 10 del arreglo: Ingrese el elemento 11 del arreglo: Ingrese el elemento 12 del arreglo: Ingrese el elemento 13 del arreglo: Ingrese el elemento 14 del arreglo: Ingrese el elemento 15 del arreglo: Ingrese el elemento 16 del arreglo: Ingrese el elemento 17 del arreglo: Ingrese el elemento 18 del arreglo: Ingrese el elemento 19 del arreglo: Ingrese el elemento 20 del arreglo: Ingrese el elemento 21 del arreglo: Ingrese el elemento 22 del arreglo: Ingrese el elemento 23 del arreglo: Ingrese el elemento 24 del arreglo: Ingrese el elemento 25 del arreglo: Ingrese el elemento 26 del arreglo: Ingrese el elemento 27 del arreglo: Ingrese el elemento 28 del arreglo: Ingrese el elemento 29 del arreglo: Ingrese el elemento 30 del arreglo: Ingrese el elemento 31 del arreglo: Ingrese el elemento 32 del arreglo: Ingrese el elemento 33 del arreglo: Ingrese el elemento 34 del arreglo: Ingrese el elemento 35 del arreglo: Ingrese el elemento 36 del arreglo: Ingrese el elemento 37 del arreglo: Ingrese el elemento 38 del arreglo: Ingrese el elemento 39 del arreglo: Ingrese el elemento 40 del arreglo: Ingrese el elemento 41 del arreglo: Ingrese el elemento 42 del arreglo: Ingrese el elemento 43 del arreglo: Ingrese el elemento 44 del arreglo: Ingrese el elemento 45 del arreglo: Ingrese el elemento 46 del arreglo: Ingrese el elemento 47 del arreglo: Ingrese el elemento 48 del arreglo: Ingrese el elemento 49 del arreglo: Ingrese el elemento 50 del arreglo: Ingrese el elemento 51 del arreglo: Ingrese el elemento 52 del arreglo: Ingrese el elemento 53 del arreglo: Ingrese el elemento 54 del arreglo: Ingrese el elemento 55 del arreglo: Ingrese el elemento 56 del arreglo: Ingrese el elemento 57 del arreglo: Ingrese el elemento 58 del arreglo: Ingrese el elemento 59 del arreglo: Ingrese el elemento 60 del arreglo: Ingrese el elemento 61 del arreglo: Ingrese el elemento 62 del arreglo: Ingrese el elemento 63 del arreglo: Ingrese el elemento 64 del arreglo: Ingrese el elemento 65 del arreglo: Ingrese el elemento 66 del arreglo: Ingrese el elemento 67 del arreglo: Ingrese el elemento 68 del arreglo: Ingrese el elemento 69 del arreglo: Ingrese el elemento 70 del arreglo: Ingrese el elemento 71 del arreglo: Ingrese el elemento 72 del arreglo: Ingrese el elemento 73 del arreglo: Ingrese el elemento 74 del arreglo: Ingrese el elemento 75 del arreglo: Ingrese el elemento 76 del arreglo: Ingrese el elemento 77 del arreglo: Ingrese el elemento 78 del arreglo: Ingrese el elemento 79 del arreglo: Ingrese el elemento 80 del arreglo: Ingrese el elemento 81 del arreglo: Ingrese el elemento 82 del arreglo: Ingrese el elemento 83 del arreglo: Ingrese el elemento 84 del arreglo: Ingrese el elemento 85 del arreglo: Ingrese el elemento 86 del arreglo: Ingrese el elemento 87 del arreglo: Ingrese el elemento 88 del arreglo: Ingrese el elemento 89 del arreglo: Ingrese el elemento 90 del arreglo: Ingrese el elemento 91 del arreglo: Ingrese el elemento 92 del arreglo: Ingrese el elemento 93 del arreglo: Ingrese el elemento 94 del arreglo: Ingrese el elemento 95 del arreglo: Ingrese el elemento 96 del arreglo: Ingrese el elemento 97 del arreglo: Ingrese el elemento 98 del arreglo: Ingrese el elemento 99 del arreglo: Ingrese el elemento 100 del arreglo: 

Ingrese el número que se va a buscar en el arreglo: 

El número  se encuentra 100 veces en el arreglo

stderr

copy

Use of uninitialized value $ARRE[0] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[1] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[2] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[3] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[4] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[5] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[6] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[7] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[8] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[9] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[10] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[11] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[12] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[13] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[14] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[15] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[16] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[17] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[18] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[19] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[20] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[21] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[22] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[23] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[24] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[25] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[26] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[27] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[28] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[29] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[30] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[31] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[32] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[33] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[34] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[35] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[36] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[37] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[38] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[39] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[40] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[41] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[42] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[43] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[44] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[45] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[46] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[47] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[48] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[49] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[50] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[51] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[52] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[53] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[54] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[55] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[56] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[57] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[58] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[59] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[60] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[61] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[62] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[63] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[64] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[65] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[66] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[67] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[68] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[69] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[70] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[71] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[72] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[73] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[74] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[75] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[76] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[77] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[78] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[79] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[80] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[81] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[82] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[83] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[84] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[85] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[86] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[87] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[88] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[89] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[90] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[91] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[92] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[93] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[94] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[95] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[96] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[97] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[98] in chomp at prog.pl line 18.
Use of uninitialized value $ARRE[99] in chomp at prog.pl line 18.
Use of uninitialized value $NUM in chomp at prog.pl line 23.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[0] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[1] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[2] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[3] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[4] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[5] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[6] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[7] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[8] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[9] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[10] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[11] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[12] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[13] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[14] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[15] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[16] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[17] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[18] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[19] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[20] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[21] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[22] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[23] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[24] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[25] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[26] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[27] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[28] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[29] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[30] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[31] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[32] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[33] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[34] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[35] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[36] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[37] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[38] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[39] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[40] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[41] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[42] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[43] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[44] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[45] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[46] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[47] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[48] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[49] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[50] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[51] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[52] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[53] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[54] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[55] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[56] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[57] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[58] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[59] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[60] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[61] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[62] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[63] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[64] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[65] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[66] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[67] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[68] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[69] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[70] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[71] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[72] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[73] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[74] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[75] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[76] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[77] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[78] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[79] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[80] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[81] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[82] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[83] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[84] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[85] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[86] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[87] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[88] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[89] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[90] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[91] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[92] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[93] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[94] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[95] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[96] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[97] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[98] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $ARRE[99] in numeric eq (==) at prog.pl line 26.
Use of uninitialized value $NUM in concatenation (.) or string at prog.pl line 33.

https://ideone.com/1BfKmA

language:

Perl (perl 5.28.1)

created:

visibility:

public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!

Discover > Sphere Engine API

Discover > IDE Widget

Choose your language