bummel

Danke für die Hinweise.

Es funktioniert alles genauso bzw. es ist mit dem "if (-x ....)" ist es besser gelöst.

Unbewusst hast du auch ein Mysterium gelüftet.

So geht es. =)

Danke für deinen Hinweis @bigvic

#!/usr/bin/perl

use strict;

use warnings;


my @log_files_closed;

my $log_files_closed;


if(`find /sbin -name fuser` ne ""){

   @log_files_closed = ([]);

      `/sbin/fuser /sbin/fuser  2>/dev/null`;

      if ($? == "256"){

		foreach (grep { !/datei|data/ } @{[</dir/*.{log,err}]}){

			if (`/sbin/fuser $_ 2>/dev/null` eq "") {

				push (@log_files_closed,$_);

			}				

      }

      else{

         print ("fuser nicht ausführbar");

      }

}

else{

   print ("fuser nicht gefunden");

}


foreach (@log_files_closed){

   print "$_\n";

}

Hallo,

ich veruche gerade einen regex (druch einen grep) mit glob zu kombinieren.

Es sollen dabei alle Logs, die ".log" enhalten und nicht "datei" im Namen haben, in ein Array gepusht werden.

Kann mir jemand sagen wie ich grep und glob korrekt kombiniere? Andere Lösungen sind natürlich auch gerne gesehen.

#!/usr/bin/perl

use strict;

use warnings;


my @log_files_closed;

my $log_files_closed;


if(`find /sbin -name fuser` ne ""){

   @log_files_closed = ([]);

      `/sbin/fuser /sbin/fuser  2>/dev/null`;

      if ($? == "256"){

         while ( grep /[datei]/ glob("/logs/*.log*")){

            if (`/sbin/fuser $_ 2>/dev/null` eq "") {

               push (@log_files_closed,$_);

            }

         }

         while (glob("/logs/*.err*")){

            if (`/sbin/fuser $_ 2>/dev/null` eq "") {

               push (@log_files_closed,$_);

            }

         }

      }

      else{

         print ("fuser nicht ausführbar");

      }

}

else{

   print ("fuser nicht gefunden");

}


foreach (@log_files_closed){

   print "$_\n";

}

Gruß

Bummel

Ich würde mit Party machen

Nur überlege ich gerade, wie ich so früh in Ulm sein soll...

Ich würde evtl bei dir mitfahren @Enno

Muss das leider etwas spontan entscheiden, weil mein "Frauchen" noch nicht weiß wann sie mich besuchen kommen kann.

Hätte auch Lust.

Mit dem schlafen müsste ich auch klären... ^^

In meiner alten Firma war die Seite von Beathe Uhse, unter den Top 10 der Seitenaufrufe...

Frage mich auch, was manche Leute auf Arbeit machen. ^^

Meine WE_Planung Wäsche waschen -.-

Stell nen 300l Eimer hin und du kommst übern Tag.....

Wo sind eure Bilder zu finden? =)

Ich kannn als Whiskey Glenrothes empfehlen =)

Süß sieht der Goulasz aus =)

Stellt ihr euch hier immer mit Foto vor?

Senior Specialist for Legal Detonation

Zwei Openbooks für Unix/ Linux:

Galileo Computing: Wie werde ich UNIX-Guru? - Kapitel: Vorwort

Galileo Computing :: Linux - index

Auf der Seite gibt es noch weite Openbooks für z.B. Java, Shell-Skripte, usw.

Das Unix-Buch habe ich selbst teilweise gelesen und finde das ganz gut.

@Max - Mist zu langsam

In welche Richtung solles es gehen?

Windows, Unix/Linux, Netzwerke, usw....

Woran hast du interesse?

Blockt die FW der Firma?

Kleiner Gedankenerguss am morgen....

Ja der muss mit in Anhang, dieser kann aber auch auf einer CD sein.

Quellcode kann ja gerne ein paar Seiten lang werden ^^

Ist mir garnicht aufgefallen

blade of darkness?

Naja das sind die Grundlagen der Grundlagen @Crash =)

Von daher doch ganz ok.

Lpic wird dann schon schwerer. (Denke ich, habe leider noch keinen machen können)

Hast du schon eine Ahnung in welche Richtung du später gehen willst?

Falls ja, würde ich es glaube ich bevorzugen eine Firma zunehmen wo du dies hauptsächlich machen kannst.

Grundlegend ist es aber nicht verkehrt alles zumachen, aber in der IT werden hauptsächlich Spezialisten gesucht.

BoFrost - Werbung

Wenn du Übertakten willst fällt die Xeon aber raus.

Also ich habe es gespielt, aber ich komme gerade nicht drauf.... ahhh

Sins of Solar Empire?