open my $SEARCH_ITEMS, "<", "new3.txt") or die "Could not open new3.txt $!";; my @lines = <$SEARCH_ITEMS>;