Help for this page

Select Code to Download

Select or download this

  my @new_data;
  for my $i ( 0 .. $#data ) {
...
  # replace:
  @data = @new_data;