Try something like this:

my $fileold = "ArchLDAP";
my $filenew = "LDAP";
my $infileold = $ARGV[0] || $fileold;
my $infilenew = $ARGV[1] || $filenew;
[download]

Mik
Mik Firestone ( perlus bigotus maximus )