foreach my $interval (){ my @find_interval = split(/\t/, $interval); my $start = $find_interval[1]; my $end = $find_interval[2];