X-Git-Url: https://git.madduck.net/code/myrepos.git/blobdiff_plain/0b9d48697246b7880e52dcfa6d1555d787dd393c..d0f03c0a6b6d5bb9d7db7ffff4d07f75959bbaf6:/webcheckout?ds=sidebyside diff --git a/webcheckout b/webcheckout index d94ad97..e48d9de 100755 --- a/webcheckout +++ b/webcheckout @@ -47,13 +47,21 @@ may still be noisy however.) =back +=head1 PREREQUISITES + +To use this program you will need lots of VCS programs installed, +obviously. It also depends on the perl LWP and HTML::Parser modules. + +If the perl URI module is installed, webcheckout can heuristically guess +what you mean by partial URLs, such as "kitenet.net/~joey"' + =head1 AUTHOR Copyright 2009 Joey Hess Licensed under the GNU GPL version 2 or higher. -This program is included in mr +This program is included in myrepos =cut @@ -111,6 +119,11 @@ sub getopts { $url=shift @ARGV; $destdir=shift @ARGV; + eval q{use URI::Heuristic}; + if (! $@) { + $url=URI::Heuristic::uf_uristr($url); + } + if ($noact) { $quiet=0; }