this gives me a DTD as output.
My problem is I want to parse this output!
But how can ich give it to the second code that this parses the result
of (sub_daten_einlesen)
I hope someone understands my question ;-)

#!/usr/bin/perl -w
use LWP::Simple;

sub daten_einlesen
{
 print "geben Sie ein gtpprotein ein\n";
my $eingabe =<STDIN>;

my
$url='http://eutils.ncbi.nlm.nih.gov/entrez/eutils/egquery.fcgi?term=';
# print $url;
# print"\n";
        $newurl= $url.$eingabe;
# print $newurl;
 return $newurl;


}



$url1 =daten_einlesen();
$doc = get $url1;
print $doc;

#!/xprog/bin/perl

                        # use module
                        use XML::Simple;
                        use Data::Dumper;

                        # create object
                        $xml = new XML::Simple;

                        # read XML file
                        $data = $xml->XMLin("which path???");

                        # print output
                        print Dumper($data);






-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to