Queries & Responses for 21 October 2005

show me your pecker
Pileated pecker o'wood. I don’t know. It’s pretty big…
You know I should also mention that in addition to being 15 inches long it can deliver a pounding all day.
[close] Permanent link · http://querylog.com/q/show+me+your+pecker

Suggested HTML for linking:
Link preview: show me your pecker
21 October 2005 · PR
The page found by the original query:
The Pecker Affair
nymphomaniac
I would like to see a renaissance of this kind of word. Nymphomaniac is ever so much nicer than slut.
To lessen the impact of certain epithets leveled against my own self and several generations of my kin I humbly request that we replace another class of brutish nouns with dipsomaniac.
[close] Permanent link · http://querylog.com/q/nymphomaniac

Suggested HTML for linking:
Link preview: nymphomaniac
21 October 2005 · wine & roses
The page found by the original query:
nymphomaniac—The Devil’s Dictionary X™
i fucked my dad and i loved it
Whatever. It was definitely not worth $20 is all I’m saying.
[close] Permanent link · http://querylog.com/q/i+fucked+my+dad+and+i+loved+it

Suggested HTML for linking:
Link preview: i fucked my dad and i loved it
21 October 2005 · your mother
The page found by the original query:
majenta || my young mom || sedition.com
perl cgi url exists
That’s a somewhat tall order. Unlike a file system which allows you to ask, “Does file X exist?” the web is more like, “Show me file/resource X or tell me why you won’t/can’t.”
This would do the trick for many cases though.
use strict;
use WWW::Mechanize;
my $mech = WWW::Mechanize->new();
$mech->agent_alias('Windows IE 6');
my $uri_to_check = shift || die "Give a URI!\n";
$mech->get( $uri_to_check );
if ( $mech->success ) { print "Valid: $uri_to_check\n"; } else { warn "Invalid! $uri_to_check\n"; warn " Status: ", $mech->status(), "\n"; }
There are much more simple and idiomatic ways to write that—even in one line—using something like LWP instead of WWW::Mechanize. It has additional problems though in that some servers won’t take requests from LWP so you might get false negatives unless you call your requesting agent a standard browser name as we do with the alias() above.
[close] Permanent link · http://querylog.com/q/perl+cgi+url+exists

Suggested HTML for linking:
Link preview: perl cgi url exists
21 October 2005 · Internet & computing
The page found by the original query:
CGI with dispatch hash