Если кто знает как
 

Если кто знает как на Perl определить имя хоста , если ENV{'REMOTE_HOST'} и gethostbyaddr() неработают?

А в честь чего не работают $ENV{} и gethostbyaddr() ?

PS: Остается только шеловский host или своя реализация dns lookup.

Хостинг бесплатный .
А про шелловский host поподробнее можно?

Забудь про шел на бесплатном хостинге.