Search Results

Perl approach:
#!/usr/bin/perl
use strict;
use warnings;

open my $input, "<", "$ARGV[0]" or die "cannot open file: $ARGV[0]";

my %ranges;
while (my $line = <$input>) {
next if $. == 1;
...

Add your headers in BEGIN block edit print statement, try to learn ... after providing 99.99% of code.. if you can't edit small header information means, what I can tell. Please don't expect others...

Here is an awk approach:
awk '
BEGIN {
print "Algorithm\tPrediction\tLower ragne"
}
function checkIDX(a)
{
n = split ( I[a], T,...

Hi,
Another way with grep and xargs (as sed Scrutinizer solution):
1) xargs posix:
grep -Ef <(cat file1 | xargs -I {} printf "(^|[[:space:]]){}([[:space:]]|$)\n") file2
2) xargs gnu:
grep -Ef...

A grep solution might be (if your grep understands "-"):
sed 's/^/(^|[[:space:]])/; s/$/([[:space:]]|$)/' file1 | grep -Ef - file2

or (in bash / ksh93 )

grep -Ef <(sed 's/^/(^|[[:space:]])/;...

Try:
awk 'NR==FNR{A[$1]; next} {for(i=1; i<=NF; i++) if ($i in A) {print; next}}' file1 file2