w_array();
is($md5,$md52, 'md5 equal case 3');
is($recordid,$recordid2, 'recordid equal case 3');
isnt($uid1,$uid2, 'urlid differ case 3');
($t,$t5) = $sth->fetchrow_array();
ok(!defined($t), 'num rec
array();
($recordid2,$uid2,$md52) = $sth->fetchrow_array();
is($md51, $md52, 'md5 equal case 2');
isnt($uid1,$uid2, 'urlid differ case 2');
is($recordid1,$recordid2, 'recordid equal case 2');
($t,$t5)
w2xwi=Combine::MySQLhdb::Get($recordid);
is($new2xwi->recordid, $recordid, 'del recordid()');
isnt($new2xwi->type, 'text/html', 'del type()');
isnt($new2xwi->title, 'A title string', 'del title()');
ppy' => 1);
my $nurl = $u->normalise();
$normURLs{$nurl}=1;
}
use Test::More tests => 3;
isnt($wait,Combine::Config::Get('WaitIntervalHost'),'new value WaitIntervalHost');
my $t=4;
my $i=0;
w