Re^2: Abbreviated output when attempting to do whois via script

in reply to Re: Abbreviated output when attempting to do whois via script
in thread Abbreviated output when attempting to do whois via script

Thanks for the reply podmaster,

So now I am baffled. This does indeed work:

perl -le'print `whois friendsofjabu.com`'

So what am I doing wrong here? Why does this get only the abbreviated output?

#!/usr/local/bin/perl -w
use strict;

use CGI::Carp qw/fatalsToBrowser /;
use CGI qw/:standard/;

use CGI::Pretty qw/ :html3 /;

my $dom = "friendsofjabu.com";

my $q = CGI->new();
print $q->header,start_html, '<pre>';

print my $output = `whois $dom` . '</pre>';
[download]

BTW when I use this code to lookup a domain which is NOT in the redemption period, I have just found that it works fine.

Any thoughts?

TIA
jg
_____________________________________________________
"The man who grasps principles can successfully select his own methods.
The man who tries methods, ignoring principles, is sure to have trouble.
~ Ralph Waldo Emerson

In Section Seekers of Perl Wisdom