This is a repository for my favorite scripts, regexes, commandlines, utilities, code snippets, tips, and other geeky things that might be useful to someone googling for an obscure solution some day. It’s also a place to share my thoughts about companies I’ve dealt with, my favorite lifehacks, observations of interesting human behavior, clever and/or evil marketing schemes I’ve run across, and anything else I feel compelled to write about.
$url = “Foo bar com.dx?q=23″;
$url =~ s/([^\w\-\.\@])/$1 eq ” “?”+”:
sprintf(”%%%2.2x”,ord($1))/eg;
print $url;
I don’t remember where I got this, but it must have come in handy for me at some point. Never hurts to have this kind of stuff laying around, just in case.
Posted by spugbrap at 11:43pm EDT
Categories: encoding, programming, perl, code, snippets, geek
You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.
spugbrap’s blog is proudly powered by WordPress
Subscribe to:
Entries (RSS)
and Comments (RSS)
subscribe to entries feed
August 15th, 2006 at 1:24 pm
I think I may already have something like this in my Clint::whatever libraries.. but man.. I’m totally saving that snippet into my perl-NOTES.txt file :)