Datei öffnen und nach einer Zeichenkette suchen

15/07/2010 - 23:48 von Robert Geese | Report spam
Ich möchte mit Perl eine Datei öffnen, z. B. "/proc/cpuinfo" und dann
nach einer Zeichenkette wie "acpi" suchen. Nur wenn diese Zeichenkette
gefunden wird sollen weitere Funktionen durchgeführt werden. Ansonsten
eine Fehlermeldung ausgeben werden.

Vielen Dank für Eure Hilfe.
 

Lesen sie die antworten

#1 Nils Müller
16/07/2010 - 09:55 | Warnen spam
Am 15.07.2010 23:48, schrieb Robert Geese:
Ich möchte mit Perl eine Datei öffnen, z. B. "/proc/cpuinfo" und dann
nach einer Zeichenkette wie "acpi" suchen. Nur wenn diese Zeichenkette
gefunden wird sollen weitere Funktionen durchgeführt werden. Ansonsten
eine Fehlermeldung ausgeben werden.
Vielen Dank für Eure Hilfe.



Ich habe mir folgende Routine geschrieben um das Datenvolumen für ein Device zu erhalten.
Vielleicht hilft es Dir.

my $procnetdev = "/proc/net/dev"; # name of file
my $device = "eth0"; # standard device

my $tmp = `cat "$procnetdev" | grep "$device"`;
$last_out = (($tmp =~ m/(\d+)/g)[9]); # get last_out
$last_in = (($tmp =~ m/(\d+)/g)[1]); # get last_in

Ähnliche fragen