Domain names and sleep. Re: [FWP] Recursion, anyone?

[Ian Phillipps <igp_list2@tesco.net>]

On Thu, 12 Apr 2001 at 07:47:31 -0500, Keith Calvert Ivey wrote:

> I don't know why people would want domains with hyphens at the
> end or double hyphens in the middle, though.  People have 
> trouble enough getting users to type their single-hyphen domain 
> names correctly.  Might as well register one of the random 
> passwords from the other thread.

They already did. Names in .com were being registered at a rate of 1.3
per *second* a couple of months ago. That's 100000 names/hour.

ObFWP:

I wrote this as a quick hack for real use. The golfers here might like
another hole. You're allowed to remove the "verbose" stuff if you like.
Note that code below handles 1:2:3 correctly.

I joined up the ARGVs on a whim, then remembered how much easier it
often is to deal with an unparsed parameter line. (BCPL has a
pseudo-file you read to get parameters).

#! /usr/local/bin/perl -w

$_=" @ARGV";

$verbose = s/\s+-v//;

%mults=qw/m 60 h 3600 d 86400/;

1 while
        s/(\d+):(\d+)/ 60*$1+$2 /eg
    or
        s/(\d+)\s*([mhd])[a-z]*/ $mults{$2}*$1 /ieg;
$_ = join '+',split;
warn "sleep $_\n" if $verbose;

sleep $_;

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe