nicht angemeldet
Wie kann man Datenstrings vergleichen?
Hi
Danke für die Hilfe die Ihr mir im letzten Beitrag geleistet habt!!
Vielen Dank
Es ist aber schon wieder eine Frage aufgekommen!
Wie kann man Datenstrings vergleichen? (Perl)
open(NEU, "<$mlink"); # Datei zum Lesen öffnen
@member=<NEU>;
close(NEU);
if (@member[3] eq "keine")
{
print @member[3];
@homepage=("<a href="",@member[3],"">Homepage</a>");
}
Ich vermute, dass ein Leerzeichen oder Zeilenumbruch daran schuld ist!
Wenn ja wie bekommt man diese weg?
Denn so funktionierts!!
open(NEU, "<$mlink"); # Datei zum Lesen öffnen
@member=<NEU>;
close(NEU);
$ram = substr(@member[3],0,5);
if ($ram eq "keine")
{
print @member[3];
@homepage=("<a href="",@member[3],"">Homepage</a>");
}
Aber das ist kein sauberes Programmieren!!!!!!!!!!!
In der Zeile $member[3] steht nur das Wort "keine"!
Danke für Ihre Hilfe!!!!!
-
Hi Joachim
du kannst den Zeilenumbruch mir chomp($stringmitzeilenumbruch);
entfernen. Jetzt besitzt $stringmitzeilenumbruch keinen zeilenumbruch mehr!ciao Lorenz
Hi
Danke für die Hilfe die Ihr mir im letzten Beitrag geleistet habt!!
Vielen DankEs ist aber schon wieder eine Frage aufgekommen!
Wie kann man Datenstrings vergleichen? (Perl)
open(NEU, "<$mlink"); # Datei zum Lesen öffnen
»» @member=<NEU>;
»» close(NEU);if (@member[3] eq "keine")
»» {
»» print @member[3];
»» @homepage=("<a href="",@member[3],"">Homepage</a>");
»» }Ich vermute, dass ein Leerzeichen oder Zeilenumbruch daran schuld ist!
Wenn ja wie bekommt man diese weg?Denn so funktionierts!!
open(NEU, "<$mlink"); # Datei zum Lesen öffnen
@member=<NEU>;
close(NEU);$ram = substr(@member[3],0,5);
»» if ($ram eq "keine")
»» {
»» print @member[3];
»» @homepage=("<a href="",@member[3],"">Homepage</a>");
»» }Aber das ist kein sauberes Programmieren!!!!!!!!!!!
In der Zeile $member[3] steht nur das Wort "keine"!
Danke für Ihre Hilfe!!!!!
-
open(NEU, "<$mlink"); # Datei zum Lesen öffnen
open NEU, "<$mklink" or die "Kann $mlink nicht oeffnen: $!";
»» @member=<NEU>;
chomp(@member = <NEU>);
if (@member[3] eq "keine")
^
$member[3]Wenn ja wie bekommt man diese weg?
Den Zeilenumbruch entfernst Du am besten mit chomp;
Pete