T
Tamidor
Jungspund
So ich habe folgende Schleife gebastelt, die aus einer Datei eine Zahl (z.B 4.234) ausliest und abändert, der Rest soll einfach von der alten Datei übernommen werden, so dass ein Kopie der Datei entsteht bei der nur der eine Wert geändert wurde.
Problem ist nur, dass ich die Suchabfrage nicht so eindeutig gestalten kann, dass nur auf eine Zeile zutrifft. Ich weiss aber, dass die gewünschte Zahl IMMER vor allen anderen auf die Suchabfrage zutrifft. Das heisst ich möchte, dass die if Abfrage nur bis zum ersten Erfolg gilt und danach nur noch die else Option.
Sorry für die vielen Anfängerfragen, aber bei diesen spezielleren Problemen finde ich in den gängigen Internettutorials einfach die Antworten nicht. Wahrscheinlich, weil ich nicht genau wonach ich suchen muss.
while ( $zeile = <INPUT> )
{
if ($zeile =~ /^(\d+\.\d+)\n/)
{
$alat = $1;
$alat = $alat*(0.9+(($i-1)*0.05));
print $alat, "\n";
print OPTIN $alat,"\n";
}
else {print OPTIN $zeile;}
}
Problem ist nur, dass ich die Suchabfrage nicht so eindeutig gestalten kann, dass nur auf eine Zeile zutrifft. Ich weiss aber, dass die gewünschte Zahl IMMER vor allen anderen auf die Suchabfrage zutrifft. Das heisst ich möchte, dass die if Abfrage nur bis zum ersten Erfolg gilt und danach nur noch die else Option.
Sorry für die vielen Anfängerfragen, aber bei diesen spezielleren Problemen finde ich in den gängigen Internettutorials einfach die Antworten nicht. Wahrscheinlich, weil ich nicht genau wonach ich suchen muss.
while ( $zeile = <INPUT> )
{
if ($zeile =~ /^(\d+\.\d+)\n/)
{
$alat = $1;
$alat = $alat*(0.9+(($i-1)*0.05));
print $alat, "\n";
print OPTIN $alat,"\n";
}
else {print OPTIN $zeile;}
}