Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re^2: Can the "#" character be passed via $ENV{QUERY_STRING} ?

by mdillon (Priest)
on Feb 25, 2005 at 02:35 UTC ( #434344=note: print w/replies, xml ) Need Help??

in reply to Re: Can the "#" character be passed via $ENV{QUERY_STRING} ?
in thread Can the "#" character be passed via $ENV{QUERY_STRING} ?

You don't need to load all of CGI to do this if you are taking the whole QUERY_STRING as a single value. You can use URI:Escape directly. It is an extremely lightweight module. You'll want to use uri_unescape, like so:
use URI::Escape qw(uri_unescape); my $query_string = uri_unescape $ENV{QUERY_STRING};

Replies are listed 'Best First'.
Re^3: Can the "#" character be passed via $ENV{QUERY_STRING} ?
by BUU (Prior) on Feb 25, 2005 at 06:46 UTC
    Just to note, uri_unescape is functionally:  s/%(\d\d)/chr $1/eg; if you don't even want to load the module.
      I think that should be:
      In fact, that's pretty much exactly what's in URI::Escape, except that the module also handles scalar v. list context and multiple arguments. Using uri_unescape still seems preferable to me, since the resource overhead of using the module is basically nil and the mnemonic benefit of seeing uri_unescape instead of a regex is considerable.
        You know, you're completely correct, and that mostly proves your point about using a module. I theoretially knew what the proper code should be, but I wasn't paying attention and wrote something that was broken and didn't even think about it, the module would have been much easier.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (4)
As of 2022-11-28 19:19 GMT
Find Nodes?
    Voting Booth?