Help in getting organism names of the nucleotide entries.

Hello,

With respect to the post:
http://bio.perl.org/pipermail/bioperl-l/2009-December/031831.html

When used for nucleotide database it gives the following error:

--------------------- WARNING ---------------------
MSG: The -email parameter is now required, per NCBI E-utilities policy
---------------------------------------------------

--------------------- WARNING ---------------------
MSG: No linksets returned
---------------------------------------------------

--------------------- WARNING ---------------------
MSG: The -email parameter is now required, per NCBI E-utilities policy
---------------------------------------------------

------------- EXCEPTION: Bio::Root::Exception -------------
MSG: NCBI esummary fatal error: Empty id list - nothing todo
STACK: Error::throw
STACK: Bio::Root::Root::throw /usr/share/perl5/Bio/Root/Root.pm:472
STACK: Bio::Tools::EUtilities::parse_data /usr/share/perl5/Bio/Tools/EUtilities.pm:382
STACK: Bio::Tools::EUtilities::next_DocSum /usr/share/perl5/Bio/Tools/EUtilities.pm:964
STACK: Bio::DB::EUtilities::next_DocSum /usr/share/perl5/Bio/DB/EUtilities.pm:914
STACK: getOrgNameFrmAccession.pl:29
-----------------------------------------------------------

Please suggest the relevant changes in the above script to make it work for the nucleotide entries also.

Thanks in advance,
Regards,
Sanket