Select Code to Download

    new => sub { bless {}, 'IO::Socket::INET' },

#!/usr/bin/perl
use warnings;
...
        1;
    }
}