11 $SIG{ __DIE__ } = sub { Carp::confess( @_ ) };
17 getter => 'filegetter',
18 'plugin.youtube.QUALITY' => 'hd',
19 'plugin.filegetter.FILEPATTERN' => './%3$s.flv',
26 foreach (keys(%{$m})) {
27 printf("%s: %s\n", $_, defined($m->{$_})?$m->{$_}:'(undef)');
31 print("Downloading $m->{'TITLE'}\n");
37 GetOptions("i" => \$info, "d" => \$debug);
39 push(@INC, dirname(realpath($0)));
42 unless(libvideosite::register_api({
43 link_callback => \&link_callback,
44 _config_default => sub { return \%config },
45 _debug => sub { return $debug },
47 die("Error registering API: $libvideosite::error");
50 unless(libvideosite::init()) {
51 die("Could not init libvideosite: $libvideosite::error");
55 printf("Handling %s...\n", $_);
56 libvideosite::check_for_link({
58 ewpf => sub { print @_, "\n" },