Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re^5: converting smart quotes

by slugger415 (Scribe)
on Mar 20, 2012 at 14:30 UTC ( #960580=note: print w/replies, xml ) Need Help??

in reply to Re^4: converting smart quotes
in thread converting smart quotes

Thanks -- so what does sprintf('[U+%04X]' do, and why is it coming out as What[U+2019]s new?

Replies are listed 'Best First'.
Re^6: converting smart quotes
by tobyink (Abbot) on Mar 20, 2012 at 15:27 UTC

    It replaces every character in that character class (basically: the unusual ASCII control characters, plus anything outside ASCII) with:

    1. opening square bracket, followed by
    2. capital letter "U", followed by
    3. plus sign, followed by
    4. the numeric value of character being replaced, in uppercase hexadecimal, padded to a minimum of four digits, followed by
    5. closing square bracket

    It's a regular expression I use quite... regularly. It makes any non-ASCII characters stick out like a sore thumb, so you can see exactly what characters are in your string.

    perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (5)
As of 2016-10-25 22:11 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (330 votes). Check out past polls.