]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/interface/helm_wget.in
This commit was manufactured by cvs2svn to create branch 'init'.
[helm.git] / helm / interface / helm_wget.in
diff --git a/helm/interface/helm_wget.in b/helm/interface/helm_wget.in
deleted file mode 100755 (executable)
index 8aa0260..0000000
+++ /dev/null
@@ -1,19 +0,0 @@
-#!@PERL_BINARY@
-
-if ($#ARGV != 1) {
- print STDERR "Usage: helm_wget prefix URL\n";
- exit -1;
-}
-
-my ($prefix,$URL) = @ARGV;
-if ($URL =~ /^file:\//) {
- $URL =~ s/^file:\///;
- my $command = "mkdir -p $prefix ; cp $URL $prefix";
- print "$command\n";
- system($command) == 0
-  or die "\"$command\" error";
-} else {
- my $command = "wget -c -P $prefix $URL";
- system($command) == 0
-  or die "\"$command\" error";
-}