Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: Character Class Abbreviations

by Terminal (Initiate)
on Dec 23, 2005 at 21:29 UTC ( #518833=note: print w/ replies, xml ) Need Help??


in reply to Character Class Abbreviations

Perhaps you could show some examples of these? I'm a bit confused...
I tried

if ($_ =~ [[en]]) { print "yes\n";} else { print "no\n";}
Didn't work :( Always printed no, even when I had "en" in the document :(

Code tags added by Arunbear


Comment on Re: Character Class Abbreviations
Download Code
Re^2: Character Class Abbreviations
by planetscape (Canon) on Dec 24, 2005 at 00:19 UTC

    In replying to a 6-yr old node, your question is in danger of flying beneath everyone's radar. Better to post under Seekers of Perl Wisdom. To get an idea of how this site works, I recommend looking at the "Welcome to the Monastery" section of the Tutorials page.

    You might wish to check out some of the references listed here: Re: regexp: extracting info

    In your example, it sounds to me more like you are trying to match the literal string "en". But let's assume for a moment you really want a character class...

    One of the tools I didn't mention in the writeup above is the simple "patten test" program from Learning Perl, 3rd Ed. I often use this when first constructing a regex because it's simple, easy to edit, and I get immediate feedback. So let's start with that program, modified slightly to match the character class [en] .

    # From: Schwartz & Phoenix: Learning Perl, 3rd Ed (The Llama), pp. 103 use strict; while (<>) { chomp; if (/[en]/) { print "Matched: |$`<$&>$'|\n"; } else { print "No match.\n"; } }

    Let's assume that this is our "test" file:

    English French Spanish German Aramaic Arabic

    Where and how the character class matches may surprise you:

    Matched: |E<n>glish| Matched: |Fr<e>nch| Matched: |Spa<n>ish| Matched: |G<e>rman| No match. No match. No match.

    If you were expecting output more like the following, matching the string "en":

    No match. Matched: |Fr<en>ch| No match. No match. No match. No match. No match.

    You will need to change the program as follows:

    # From: Schwartz & Phoenix: Learning Perl, 3rd Ed (The Llama), pp. 103 use strict; while (<>) { chomp; if (/en/) { print "Matched: |$`<$&>$'|\n"; } else { print "No match.\n"; } }

    HTH,

    planetscape

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2015-07-01 23:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (25 votes), past polls