--- mirror_cpan.pl	2003/02/01 00:51:51	1.2
+++ mirror_cpan.pl	2003/08/06 17:55:19	1.3
@@ -15,7 +15,8 @@
 ### CONFIG
 
 #my $REMOTE = "http://ftp.linux.hr/CPAN/";
-my $REMOTE = "http://www.cpan.org/";
+#my $REMOTE = "http://www.cpan.org/";
+my $REMOTE = "http://cpan.pliva.hr/";
 # my $REMOTE = "http://fi.cpan.org/";
 # my $REMOTE = "http://au.cpan.org/";
 # my $REMOTE = "file://Users/merlyn/MIRROR/CPAN/";
@@ -25,6 +26,8 @@
 my $LOCAL = "/rest/cpan/CPAN/";
 
 my $TRACE = 0;
+$TRACE = 1 if grep(/-v/,@ARGV);
+$TRACE = 1 if grep(/-d/,@ARGV);
 
 ### END CONFIG