Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

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?


Comment on Re^5: converting smart quotes
Select or Download Code
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?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2015-07-30 02:52 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 (269 votes), past polls