Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]12553[/thread]

Treffer mit Pfad/ nur Pfad ausgeben



<< >> 2 Einträge, 1 Seite
leo11
 2008-09-28 12:40
#114995 #114995
User since
2008-08-14
250 Artikel
BenutzerIn
[default_avatar]
Hallo,

ich habe folgenden Befehl probiert:
Code (perl): (dl )
perl -n -e 'print $_ if $_ =~ /^START/ .. $_ =~ /^STOP/' tmp 

Der Inhalt von tmp ist
1
2
START
4
5
6
7
STOP
8
9

Ausgabe ist:
START
4
5
6
7
STOP

Das funktioniert auch wenn man das rekursiv über diverse Unterordner macht:
find -type f | xargs perl -n -e 'print $_ if $_ =~ /^START/ .. $_ =~ /^STOP/'

Allerdings wird mir dann der Pfad+Dateiname nicht angezeigt, wie es bei grep Standard ist. Meine Frage: Seht ihe eine einfache Möglichkeit den Pfad noch voranzustellen. Auch würde mich interssieren wie man nur den Pfad ausgibt, wie bei grep -l 'xy'

Viele Grüße
leo
pq
 2008-09-28 13:24
#114997 #114997
User since
2003-08-04
12208 Artikel
Admin1
[Homepage]
user image
der aktuell verarbeitete dateiname steht in $ARGV. an den pfad kommst du dann mit CPAN:File::Basename::dirname
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem
<< >> 2 Einträge, 1 Seite



View all threads created 2008-09-28 12:40.