>> >> The admin asked me what command I use in order to get the name
>> 'localhost.testdrive.hp.com'. How does MP2 get this?
>> >
>> >Something like the following:
>> >
>> >use Socket;
>> >my $localhost_addr = pack('C4', 127, 0, 0, 1);
>> >my $name = gethostbyaddr($localhost_addr, Socket::AF_INET()) ||
>> 'localhost';
>> >my $iaddr = (gethostbyname($name))[-1];
>> >unless (defined $iaddr) {
>> > die "Can't resolve host: '$name' (check /etc/hosts)";
>> >}
>> >$remote_addr ||= Socket::inet_ntoa($iaddr);
>> >print $remote_addr;
>> >
>> >prints 127.0.0.1 on my machine.
>> >
>> >--
>>
>> They ask me this: :)
>>
>> When I show this to one of the engineers here we are confused
>> as to what information or what you are trying to do with these
>> commands. Can you please explain what you are trying to do?
>
>It tries to resolve 127.0.0.1.
Seems like the admin is not going to help me.
Anyway, I compiled perl 5.8.6 on two other platforms in the testdrive program
and when I try to compile mp2 I get the same error (on these two platforms I
didn't get the error with the native perl distribution.) I don't know if this
is a problem with perl or the platforms' configurations. Is this check vital
for mod_perl to operate? Why mod_perl should resolve 127.0.0.1? Can I skip this
check in order to try to test on these platforms and what to do to skip it?
-----------------------------------------------------------------
Активирайте SMS известяване за получено писмо - http://promo.abv.bg/new_sms.html
