#!/usr/bin/perl

    BEGIN {
        $ENV{ftp_proxy} = 'current.domain.org';
    }

    use CPANPLUS;
    shell();