Hallo jan,

so etwas wie Encode::Guess nur eben nicht für Kodierungen sondern für Programmiersprachen scheint es (noch) nicht zu geben.

Für einen Eigenbau könnte man mit File::MMagic starten. Das kommt aus dem Apache-Umfeld und liefert eigentlich MIME types zurück, kann aber leicht erweitert und angepasst werden: Einfach ein eigenes magic file schreiben (und für Perl einen eigenen file type definieren).

Beispiel: Mit so einer Zeile im magic file
oder vielleicht besser
werden Perl-Scripte mit so einer shebang-Zeile als Perl zurückgemeldet.

Grüße
payx