while(<ONE>)
{  
    my $line = $_;

    while(<TWO>)
    { 

         print "different" if (!/$line/);    
    }
}