Ich habe diesen Perl code gefunden:
Code: Alles auswählen
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$req = HTTP::Request->new(GET => 'http://www.ebi.ac.uk/QuickGO/GAnnotation?protein=P12345&format=tsv');
$res = $ua->request($req, "annotation.tsv");
open (FILE, 'annotation.tsv');
Vielen Dank im Vorraus.