Use of uninitialized value

From: B. Fongo (mygrps_at_fongo.de)
Date: 10/28/03 

To: <beginners@perl.org>
Date: Tue, 28 Oct 2003 22:51:20 +0100

What may be wrong with my codes? Perl complains of use of uninitialized
value at addition and in range (or flop).

Thanks

#########################################

#!/usr/bin/perl -w
use strict;

my ($xi, $i, @numbers, @slice);
@numbers = (1..10);
$i = 0;
$xi = 0;

open(RS, ">perd.dat") || die "Could not open file. $!\n";
for (my $z = 0; $z <= $#numbers; $z++){
                
                
                  foreach (@numbers){
                          @slice = @numbers[$xi, $numbers[$i] ..
$numbers[$i]+4]; # Use of uninitialized value at here?
                          print RS "@slice\n";
                      $i++;
                  }
                  
                  $xi++;
                  
}
                   
  close(RS);

###################################
Babs

Relevant Pages

  • use strict, aliases, local
    ... use warnings; ... But the perl's guru recommend to use, "use strict". ... Can someone explain to me why perl complains. ... perldoc -f local -> perldoc perlsub ...
    (perl.beginners)
  • Benchmark 2 codes
    ... I am not able to run these 2 codes to find which is faster because I ... use strict; ... use warnings; ... use Benchmark qw; ...
    (comp.lang.perl.misc)