iirc,

log4perl.rootLogger=INFO, LOGFILE
[download]

means that it will only log INFO messages. Change it to

log4perl.rootLogger=DEBUG, LOGFILE
[download]

Have a look at the categories section for fine control over what goes where and when. For quick and simple scripts you can't beat

use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init( { level   => $debug ? $DEBUG : $INFO,
                            file    => ">>$log_file",
                            layout  => '[%-5p] [%d{yy-MM-dd hh:mm:ss.S
+SSSSS}][%r] %m - line: %L%n' } );
[download]

Which allows you to set the log level based on an option passed to the perl program.

Then you can use things like

INFO( 'Start' );

# Only use if not allowing STDOUT
#LOGDIE( 'No destination directory defined!' ) unless $dest_dir;

DEBUG( 'Dir: ', $dest_dir ) if $debug;
[download]

John

20060707 Janitored by Corion: Added formatting, code tags, as per Writeup Formatting Tips