Aktive sub-Aufrufe finden (gelöst) - #142552 (Editoren, Versionsverwaltung und andere Tools)

Crian

2010-11-09 09:53

User since
2003-08-04
5867 Artikel
ModeratorIn

2010-11-08T15:16:59 payx
Hallo Bianca,

ich würde ein Perl-Script schreiben, das über die /\.pl$/-Dateien im Projektverzeichnis loopt und darin nach /^[^#]*\b$string\b/ sucht, wobei $string der Name der gesuchten sub sei.

Praktisch wird das zum Erfolg führen.
Theoretisch unterschlägt es "böse" Zeilen wie

Code: (dl )

print "#";MEINE_SUB();

Code: (dl )

if (s#foo#bar#) { MEINE_SUB(); }

und ähnliche Spezialfälle. Aber ich hoffe, sowas kommt da nicht vor.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite