binäre Datei nach einem String durchsuchen - #83099 (Allgemeines zu Perl)

Dubu

2004-06-07 21:02

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

Code: (dl )

perl -ne 'print "$1\n" while /([\011\040-\176]{4,})/g' dateiname.ext > ausgabe.txt

Unterschied zu strings(1): Es liefert fuer ausfuehrbare Dateien auch Treffer im nicht initialisierten BCC-Teil des Codes, den strings(1) unterdrueckt.