> Bullshit, mixed the regexes together: OK, complete part looks like this now:
> 
                #<testsystem>
                #testsystem
                #</testsystem>
                        if ( /<testsystem>/ .. /<\/testsystem>/){       #lock for tag 
paragraf testsystem
                                my $line =$_;
                                unless ($line =~ /^<\/?testsystem>/ ) {# remove tags 
used if clause before
                        $testsystem = $_;
                        print "Testsystem: $testsystem";
                        }# End of unless
                        }#End of if ( /<testsystem>/ .. /<\/testsystem>/){      

I just took unless ($line =~ /^<\/?testsystem>/ ) instaed of if ($line =~ 
/^<\/?testsystem>/ )

        Ok, so long johannes 


         # Testsystem
                 if ( /<testsystem>/ .. /<\/testsystem>/){#look for the beginning and 
end part
                        my $line =$_;
                        
                        finalresultshould be something like "ignore the RegExp"
                        $testsystem = $_;
                    print "Testsystem: $testsystem";
                        }
                 } 

        Now I get all but the part i want to get. Remember i have 

        <testsystem>
        testsystem1
        </testsystem>

        and want to get the testsystem1 part into a variable...

        So now i got the inverted part. 
        
        Is there a possibility to say: ifnot ($line !=~ /^<\/?testsystem>/ 
){$testsystem=$_} ???

        Greetings Johannes

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to