Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Re: Printing Last Element of a line using perl memory?

by 7stud (Deacon)
on Feb 15, 2013 at 01:03 UTC ( #1018822=note: print w/replies, xml ) Need Help??

in reply to Printing Last Element of a line using perl memory?

When you are having trouble with regex matching, and you are certain your regex is correct, then it's time to check exactly what's in the string you're matching. One trick is to do this:

say "-->$string<--";

Any trailing whitespace will be apparent:

-->hello world <---

And if there is a newline at the end of the string, you'll see something like this:

-->hello world <--

Or if you want to reveal every character's ascii code, you can do this:

printf "%vd \n", $string; --output:--
Edit: the printf applies ord() to the characters, so the printf is not limited to ascii characters.

Replies are listed 'Best First'.
Re^2: Printing Last Element of a line using perl memory?
by BrowserUk (Pope) on Feb 15, 2013 at 01:27 UTC
    Or if you want to reveal every character in your string's ascii code, you can do this: printf "%vd \n", $string;

    Thanks for that. I had no idea it existed.

    And (IMO) even better is that is led me to just try: printf "%vx\n", $s;. And whaddayaknow. It worked!

    I'll be making much use of that in future.

    With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.

      You can even get a little fancier if you want:

      my $string = "\x15hello"; printf "%#*vx \n", " ", $string; --output:-- 0x15 0x68 0x65 0x6c 0x6c 0x6f

      And the printf() actually reveals every character's ord(), so it's not confined to ascii characters.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1018822]
[Corion]: Meh... For bringing Perl into the Enterprise, I need to learn more about GSSAPI :-(

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (10)
As of 2018-06-21 13:32 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (118 votes). Check out past polls.