Select Code to Download

#  open LOG, "< $log" or die "Can't open $log: $!";
  while (<DATA>){
    push (@data, $_) if $_ =~ /$ip/;
  }
#  close LOG;

open LOG, "< $log" or die "Can't open $log: $!"; # Uncommented
  while (<LOG>){ # Changed filehandle name
    push (@data, $_) if $_ =~ /$ip/;
  }
close LOG; # Uncommented