open STDERR, '| logger.pl';
[download]

so from here on, warnings etc become input to logger.pl instead of output to the default stderr channel. and logger.pl simply transfers each line of input to your desired logging routine e.g.

#!/usr/bin/perl
use lib '/home/me/perlib';
use 'mylogger';
while (<>) { mylogger::log($_); }
[download]