#!/usr/bin/perl

use strict;
use NCBI_PowerScripting;

my %params;
my $db = 'pubmed';
my $report = 'citation';

#EPost
$params{'db'} = $db;
$params{'id'} = 'pmid.in';

%params = epost_file(%params);

#EFetch

$params{'retmod'} = 'xml';
$params{'sort'} = 'author';
$params{'outfile'} = 'pmids.xml';

efetch_batch(%params);

# Now here I will parse the posted.dat file, insert the data into 
# a mysql database, and delete the temporary posted.dat file to 
# ready for the next pmid inputed