reading an file

2005-03-08 Thread E.Horn
Hello! I want to read this file into an array. How can i just get 4, 5, 6,7,8 into an array? And later, how can i get the contents out of this array? 1)2)3) 4) 5)6) 7)8) 9)10)11) ATOM 2909 CG1 VAL B 183

linking perl two programms

2005-02-15 Thread E.Horn
Hello! Perhaps someone can help me! Is there the possibility to link one programm to another perl programm?so that on click the link and the next programm starts? Example: print html; print title Hello/title; print head/head; print body bgcolor=\white\; print h3Suche:$search/h3; print a

reference

2005-01-03 Thread E.Horn
Hello! I have a problem to get the contents of a variable! How can i reference the contents of the $id variable? sub get_s($da,$id) { my $url='http:...db='; my $da=$_[0]; my $id=$_[1]; my $p_id='id='; my $m='ret=xml'; return $url.$da.$par_id.$id.$m; } sub pro() { my $xmldoc = $_[0]; my

Cgi Modul

2004-12-21 Thread E.Horn
How can i call a function in cgi! i want to make a htmlsite which works with my main programm an gives the result out! if i use the functon name it does not work! wo can i involve a function into this cgi script? use CGI; my $cgi = new CGI; use CGI::Carp qw(fatalsToBrowser); my

how to get this return value

2004-12-06 Thread E.Horn
Hi! This programm gives out a parsed xmlpage + a unparsed xmlpage.. how can i use the parsed data which i print out with print processNode($accessions-item($i)); into my sub get_idlist? use LWP::Simple; use XML::DOM; use CGI; my $cgi = new CGI; use CGI::Carp qw(fatalsToBrowser); my

Using SOAP,stubmaker

2004-12-01 Thread E.Horn
Hi! Has one of you experience with SOAP? And can someone tell me what stubmaker does? Regards -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

getting attributes

2004-11-30 Thread E.Horn
Hey everybody, i want to get the content of a Xmlfile. When there are no attributes it works well, but in this case i have to get the content of attribute nodes. My skript runs but gives nothing as result out. perhaps someone of you can help me? Regards Eva! #!/bin/perl -w use LWP::Simple; use

problem with function

2004-11-29 Thread E.Horn
Hello! Can someone help me with my programm that does not work. i do not get the mistake. The output is always the same, if i use daten_einlesen(nucleotide) or daten_einlesen(proteine) there is no difference! What have I done wrong? Regards #!/bin/perl -w use strict; use LWP::Simple;

re function....

2004-11-29 Thread E.Horn
Thanks a lot Mr Paton! You are right, now it works great! Have a nice day... -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

re parse irregula xml file

2004-11-12 Thread E.Horn
Hey! There are a lot modules for Xml processing! For example XML::Simple XML::Parser or XML::DOM. The Simple is not able to process mixed content. So look at http://www.xml.com/pub/a/2001/04/18/perlxmlqstart1.html or at http://search.cpan.org/~tjmather/XML-DOM/. Good luck . -- To unsubscribe,

XML::DOM

2004-11-05 Thread E.Horn
once again! how do i get the text between two tags by parsing with XML::DOM my programm #!/xprog/bin/perl -w use XML::DOM; my $file = 'xml'; my $parser = XML::DOM::Parser-new(); my $doc = $parser-parsefile($file); my $nodes = $doc-getElementsByTagName('perl'); my $n = $nodes-getLength;

XML ::SIMPLE

2004-11-02 Thread E.Horn
Hey! Does the XML SIMPLE Modul work if i only want to get the content of the text between the tags? I want to parse this xmlfile so that there is just CHINA,Hallo,27832 Or do i have to use the Modul XML parser? Result Termchina/Term egQuery ResultItem

re xml::simple

2004-11-02 Thread E.Horn
thank you -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

parse xml

2004-10-29 Thread E.Horn
geben Sie ein gtpprotein ein ras ?xml version=1.0? !DOCTYPE Result PUBLIC -//NLM//DTD eSearchResult, January 2004//EN http://www.ncbi.nlm.nih.gov/entrez/query/DTD/egquery.dtd; !-- This is the Current DTD for all Entrez databases eGSearch $Id: egquery_template.xml,v 1.10 2004/09/15

re parse xml to Franklin

2004-10-29 Thread E.Horn
Ok! So Franklin, how does your parser look like? Is this really the same homepage you parse? Where do you come from ;-) perhaps you sit in the room next door? joking...?! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

re stdin

2004-10-28 Thread E.Horn
Thanks! Where do I have to put die Only letters allowed!\n if $eingabe =~ /[^a-z]/i; just behind print geben Sie ein gtpprotein ein\n; my $eingabe =STDIN The editor has a problem with this (die). Regards -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

xml parsing

2004-10-28 Thread E.Horn
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

how to give stdin at the end of a url

2004-10-25 Thread E.Horn
Hey! I want to get information out of this page. My problem is,how can i give ($eingabe)into the url? Because that varies the output of the xmlsource! exampe: $url=.term=gtpase... gives me the result of all gtpases...how can i use a funktion or variable to make it possible ti give it into

Re: how to give stdin at the end of a url

2004-10-25 Thread E.Horn
thanks a lot! I will look at this! I have done it my way and i think now it works... I think it is not the best way,but i am happy with it! I learn perl for a week now...i am proud that is gives any result! #!/xprog/bin/perl -w use LWP::Simple; sub daten_einlesen { printf geben Sie ein

parse xml

2004-10-25 Thread E.Horn
Hey! How can i pars this xmlfile? i just want to have the MenueNamegeo/MenueName and the count out of this... ResultItem DbNamegeo/DbName MenuNameGEO Profiles/MenuName Count69408/Count StatusOk/Status

LWP

2004-10-20 Thread E.Horn
i want to install LWP! in the CPAN shell is a mistake... I have a wrong URL ! Can someone tell me which url i have to paste? cpan install LWP::UserAgent Please check, if the URLs I found in your configuration file (www.cpan.de) are valid. The urllist can be edited. E.g. with ``o conf urllist

apache

2004-10-19 Thread E.Horn
Hey! I am a perl newcomer, and now i have to program webapplications...so i need a webserver... how do i see if there is a apache webserver installed on unix? blame on me:( regards Eva -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

$_. and $_,

2004-10-13 Thread E.Horn
Hallo! Stupid question, but i am a perlbeginner! :-( What is the difference between $_. and $_, ?? Regards -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

usage of xerces xml parser

2004-10-12 Thread E.Horn
hello! now i have found xerces , a parser module. how do i extract with this one liks, out of a xmlfile!? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Parser

2004-10-11 Thread E.Horn
Hi! Has anyone tips to create a xml parser!? i do not know how to start -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response