open (LECTOR1, "$datainfo/students_creados") || die "ERROR: NO Encuentro
el archivo 'students_creados'\n";
while () { #PRIMER WHILE
chomp;
@linea = split;
$login = $linea[7];
if ($name[0] =~ /$login/i){
$count1 += 1;
if ($count1 >
Hi,
I make a script to compare some variable in the same file but it not
working could some one help please. This is the script:
my $datainfo = '/gupl/GenerarUser';
$count = 0;
$count1 = 0;
#$countline = 0;
#$linejump = 8;
open (LECTOR, "$datainfo/students_creados") || die "ERROR: NO Encuentro e
