13 getter => 'filegetter',
19 push(@INC, dirname(realpath($0)));
22 unless(libvideosite::register_api({
23 _debug => sub { return $debug },
25 die("Error registering API: $libvideosite::error");
28 unless(libvideosite::init()) {
29 die("Could not init libvideosite: $libvideosite::error");
34 printf("Doing self tests:\n");
35 foreach (libvideosite::_grabbers()) {
38 printf(" %s...", $_->{'NAME'});
45 printf(" no self test\n");
53 printf("\n\n%d succeeded\n%d failed\n%d not testable\n", $success, $fail, $notest);