Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re^5: partial match between 2 files

by Kenosis (Priest)
on Dec 05, 2012 at 19:56 UTC ( #1007382=note: print w/ replies, xml ) Need Help??


in reply to Re^4: partial match between 2 files
in thread partial match between 2 files

The script assumes the same number of words in each file, since you showed the same number words in the two different word sets. Your next step is to make a few changes to adapt this script to handle files with different numbers of words.


Comment on Re^5: partial match between 2 files
Re^6: partial match between 2 files
by lakssreedhar (Acolyte) on Dec 08, 2012 at 08:06 UTC

    I am comparing two files using hash and then checking each character by character.But even now when the position of the words are altered or some words are deleted from either files the error uninitialised value is coming

      The script that you write needs to insure that only matching words are compared for difference. You can place the code that inserts a "+" at the first string difference position into a subroutine that can be called from anywhere within your script. For example:

      use strict; use warnings; my $string1 = 'amayaM'; my $string2 = 'amayamAn'; my $result = firstStrDiff( $string1, $string2 ); print $result, "\n"; sub firstStrDiff { my ( $s1, $s2 ) = @_; ( $s1 ^ $s2 ) =~ /[^\x00]/; substr( $s2, $-[0], 0 ) = '+' if defined $-[0]; return $s2; }

      Output:

      amaya+mAn

      This can help you focus on just the remaining code that aligns the words you want send to this subroutine.

      Hope this helps!

        How can i do a partial match between a word inputted through STDIN and a list of words in a file and print the partial matched word from the file.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1007382]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (5)
As of 2014-12-22 05:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (110 votes), past polls