#!/usr/bin/perl -w
use
strict;
use
Test::Exception;
use
File::Basename;
BEGIN { -d
"t"
and
chdir
(
"t"
); }
use_ok(
"Net::Download::Queue"
);
ok(Net::Download::Queue->rebuildDatabase(),
"rebuildDatabase ok"
);
__END__
#!/usr/bin/perl -w
use
strict;
use
Test::Exception;
use
File::Basename;
BEGIN { -d
"t"
and
chdir
(
"t"
); }
use_ok(
"Net::Download::Queue"
);
ok(Net::Download::Queue->rebuildDatabase(),
"rebuildDatabase ok"
);
__END__