Programme starten die unter DOS laufen - #115190 (Allgemeines zu Perl)

topeg

2008-10-05 23:13

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Das startet wirklich das Programm HrPing?

Code: (dl )

C:/Windows/system32/cmd.exe -hrping

Schon mal so auf einer Konsole ausgeführt?

Code (perl): (dl )

for (@Daten){ s#^.*]\s+(.*)#$1#}

Das ersetzt jeden im Array stehenden Eintrag durch das Capture im regulären Ausdruck.
Längere Form:

Code (perl): (dl )

for my $zeile (@Daten)
{
 $zeile=~s/
                ^  # Anfang des Stringes
                .* # kein, ein oder beliebig viele irgendwelche Zeichen, so viele wie möglich.
                ]  # ] ( vorsicht "[  ]" ist eine Zeichengruppe. Perl erkennt zwar,
                   # das hier keine Gruppe gemeint ist, aber das muss nicht immer so sein.)
                \s # Ein Leerzeichen oder Tab
                (  # Match Start (Inhalt wird in $1 stehen)
                .* # siehe oben
                )  # Match Ende
                 /$1/x; # der Ersetzungsteil.
                        # Alles was vorher gefunden wurde wird hier ersetzt.
                        # In diesem Fall durch $1
  # Näheres siehe "reguläre Ausdrücke"
}