http://qs321.pair.com?node_id=124766


in reply to Name Space

Since I'm mentioned at the top of this thread as "having shared my etymology" I suppose I probably should... (My first comment involved a long lost trumpet, not etymology)

My full name is 'Blake David Mills IV' so most of the handles I've had are some variation on: 'blakem', 'bmills', 'bdm', or 'biv' ("Blake IV" => 'biv').

I tend to associate bmills with work, since its been the login assigned to me at my past three jobs. 'blakem' is my favorite though. It was my login in college and lots of peers called me blakem both online and off. 'biv' is a short prefix I use sometimes when naming programs and such (e.g. bivnn.cgi) but is too common to use as a defining login name. I also use a scrawled biv when legal documents ask me to initialize something.

-Blake

Replies are listed 'Best First'.
Re: Re: Name Space
by George_Sherston (Vicar) on Nov 12, 2001 at 11:33 UTC
    Well now you've been and gone and messed up the system... I'm afraid my puny non-fuzzy logic script only picks out the first node from each person in the thread. This is a fault. I know! I'm sorry! Anybody who has the time / skill to do better than this - let me have it, sibling:
    #!/usr/bin/perl -w use strict; use CGI qw(:standard :cgi-lib); use LWP::Simple; my $url = "http://perlmonks.org/index.pl?node_id=110166"; my $html = get $url or die "could not get $!"; my %names; while ($html =~ s/=(\d*?)&lastnode_id=110166">[^<]*<\/A><BR> by <A HRE +F="\/index\.pl\?node_id=\d*&lastnode_id=110166">(.*?)<\/A> on \w{3} \ +d{2}, \d{4} at \d{2}:\d{2}//s) { $names{$2} = $1 unless $names{$2}; }
    update: I notice that demerphq has done this already... as has crazyinsomniac

    George Sherston