in reply to Word Evaluation

Hi PerlRookie
Welcome to the perlmonks.org site. Now that you have registered yourself, I like you to point out few resources on this site which would be helpful to you along the path to explore and gain valuable insight of experts here.

  • Tutorial
  • On asking for help

    Also looks like you are new to perl. Pick up a good book on perl such as "Learning Perl" to continue you study

    As far as your question goes.. please explain us what actually you want to do, and what do you mean by evaluate each character in which case.

    Artist

    • Replies are listed 'Best First'.
    Re: Re: Word Evaluation
    by PerlRookie (Initiate) on Jan 29, 2003 at 16:35 UTC
      Thank you for replying. I am very new to this, so sorry for the confusion. I am adding words to a line, but do not want to duplicate. The 2 strings are $words and $w. However, if advertise is one word, I don't want the word "ad" to be left out. My expression is only checking if the 2 words are equal to each other, I need to be checking past the first 2 characters.
    		[reply]
        If I understood right, you have a list of words in a string and you want to add a word to that string, the new word should not exist already in the words string, am I right till here? If yes then you should do as follows: 
        # suppose you have:
$line = qw(advanture door tree);
# and $word is:
$word = 'ad';
...

if ($line =~ /\b$word\b/) {
  next;
} else {
  # add $word to the list
}
# only if $word will be exactly 'adventure' or 'door' it will be skipe
+d over

        [download]
        '\b' is a word boundry like a space a comma (anything that is not a-z, A-Z, 0-9 or '_'), so the regexp in the 'if' statement is exactly what you need.

        Hotshot
    		[reply]
    [d/l]

    In Section Seekers of Perl Wisdom