Mercurial > hg > skillbot
comparison skillbot.pl @ 12:d9526ab0c6bb
Fixing the handling of df's weird API key
author | Dominic Cleal <dominic@computerkb.co.uk> |
---|---|
date | Sat, 06 Dec 2008 16:00:48 +0000 |
parents | 277d818f5496 |
children | d9a9bcd44c2e |
comparison
equal
deleted
inserted
replaced
11:277d818f5496 | 12:d9526ab0c6bb |
---|---|
344 | 344 |
345 while (<FF>) { | 345 while (<FF>) { |
346 chomp; | 346 chomp; |
347 next if (/^#/); | 347 next if (/^#/); |
348 | 348 |
349 if (/^([0-9]+)\s+([a-f0-9]{64})\s+(\S+)(\s+(.+))?/i) { | 349 if (/^([0-9]+)\s+([a-z0-9]{64})\s+(\S+)(\s+(.+))?/i) { |
350 my $uid = $1; | 350 my $uid = $1; |
351 my $key = uc($2); | 351 my $key = $2; |
352 my $nick = $3; | 352 my $nick = $3; |
353 my $c = $5; | 353 my $c = $5; |
354 | 354 |
355 if (! $frienduids{$uid}) { | 355 if (! $frienduids{$uid}) { |
356 my $api = WebService::EveOnline->new( { user_id => $uid, | 356 my $api = WebService::EveOnline->new( { user_id => $uid, |