[SCM] Video extraction utility for YouTube, Google Video and other video sites (Debian packaging) branch, master, updated. upstream/2.1.7-214-g6762190
legatvs
legatvs at gmail.com
Wed Apr 1 14:45:28 UTC 2009
The following commit has been merged in the master branch:
commit c1f52e58f499f2799e66edeadf4d942ce9fd1c9a
Author: legatvs <legatvs at gmail.com>
Date: Sun Mar 29 17:30:55 2009 +0300
Add --hosts option.
diff --git a/clive b/clive
index fbf6ff5..df09f82 100755
--- a/clive
+++ b/clive
@@ -136,6 +136,7 @@ GetOptions(
'grep|g=s', 'agent|U=s', 'proxy|y=s', 'savedir|S=s',
'cclass|l=s', 'exec|x=s', 'progress|G=s', 'clivepass|V=s',
'stream=i',
+ 'hosts' => \&print_hosts,
'version|v' => \&print_version,
# Commented out until WWW::Curl is fixed:
@@ -1966,6 +1967,12 @@ sub emit
if $opts{emitxml} and @emit_queue;
}
+sub print_hosts
+{
+ print "$re_hosts{$_}\n" foreach (keys %re_hosts);
+ exit;
+}
+
sub print_version
{
my $perl_v = sprintf("--with-perl=%vd-%s", $^V, $^O);
@@ -2000,6 +2007,7 @@ clive [options]... [URL]...
-h, --help print help and exit
-v, --version print version and exit
+ --hosts print supported hosts and exit
-b, --background go to background after startup
-e, --emit-csv emit video details as csv to stdout
-E, --emit-xml emit video details as csv to stdout
--
Video extraction utility for YouTube, Google Video and other video sites (Debian packaging)
More information about the Pkg-perl-cvs-commits
mailing list