in reply to parsing whois data

It is up to the NICs WHOIS services what information they serve. Maybe a combination of the modules you use and Net::DNS::Dig fits your needs.

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'