my $lookup = '';
while( <SMALLFILE> ) {
    chomp;
    $lookup{$_} = 1;
}

while( <BIGFILE> ) {
    chomp;
    print if $lookup{$_};
}