* John W. Krahn <[EMAIL PROTECTED]> [2008-06-27 11:28]:
> Tim Bowden wrote:
>> On Tue, 2008-06-24 at 19:37 -0700, John W. Krahn wrote:
>>>
>>> Perhaps:
>>>
>>> my ( $snippet ) = $string =~ /\w\["([^"]+)",/;
>>
>> $string =~ /\w\["([^"]+)",/;
>> my $snippet = $1;
>>
>> does the trick. I can see If
Hi,
I'm trying to copy a couple of DBM files from a disk to a RAM disk, one of the
files is 500M the other quite small.
This is on Slackware 10.1.0 using: This is perl, v5.8.6 built for i486-linux
Whether I use File::Copy or I roll my own copy by reading and writing the file
the filesystem fi
* Dr.Ruud <[EMAIL PROTECTED]> [2007-12-02 14:34]:
> John W . Krahn schreef:
> > Eric Krause:
>
> > $ perl -le'
> > $_ = q[1xxx1111xx11x1];
> > print;
> > s/(1+)/@{[($l=$1)=~y|1|1|]}/g;
> > print;
> > '
> > 1xxx1111xx11x1
> > 5xxx26xx2x1
> > :-)
>
> Aiaiaiai
Hi,
I need to check through a database of just over 19000 domains to check from an
authoritative server of the root domain which nameservers are used by these
domains.
so for host.com I want to get the nameserver of host.com from an SOA of com for
example, l.gtld-servers.net
I've Googled ab