> 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]