Frage

Eine Katze in meinem Unternehmen ging eine Tastatur über und hat für mich eine gültige 1000+ Linie von ausführbarem Perl-Code links zu halten.

Dank Perl TMTOWTDI Philosophie befinde ich mich Suche Google Sinn jeder Zeile Code zu machen, sie hervorgebracht hat.

Um zu meinem Elend fügen Sie den Code nicht eingerückt ist und ein häufiges Auftreten der beiden Aussagen auf einer Linie, die Unfähigkeit, herauszufinden, ob eine Schleife ist außen / innen.

Wie kann ich Auto-beabsichtige, diesen Perl-Code zur Vernunft? Ja, ich wette, es würde einige CPAN Modul sein, das das tut. Wie wäre es mit externen Tool? Irgendwelche Hinweise?

War es hilfreich?

Lösung

Perl::Tidy kann das tun, und vieles mehr. Es ist in der Regel verwendet, um durch die perltidy ausführbare Datei installiert es.

Andere Tipps

ist Perl Tidy ein wirklich nützliches Dienstprogramm. Es kommt mit einer abschreckend Reihe von Optionen.
Es gibt einige Hinweise unter http://perltidy.sourceforge.net/ und http://perltidy.sourceforge.net/tutorial.html

Zum Beispiel -i=8 overides die Anzahl der Leerzeichen einrücken (default = 4) und -bl setzen Klammern auf eine neue Zeile:

 if ( $something )
 {
     print ".....";
 }

Ich würde auf einer Kopie vorschlagen Spiel des Codes und Sehen Sie, welche Option am besten gefällt.

Sie können entweder installieren Sie es von CPAN oder varioujs andere Optionen auf http://perltidy.sourceforge.net/ je nach Plattform und Geschmack!

Hier sind einige Beispiele dafür, wie man verwendet perltidy mit Nicht-Standard Verhalten:

  • Aktivieren Sie kuschelte-elses (zB. } else {), Grenzleitungslängen bis 300 Zeichen für alle .pl Dateien

    $ perltidy -ce -l=300 *.pl
    
  • Pflegen alte Komma Stützpunkte, einfrieren vorhandene Leerzeichen in script.pl

    $ perltidy -boc -fws script.pl
    
  • Backup-Skript und ändern script1.pl, script2.pl in-place

    $ perltidy -b script1.pl script2.pl
    
  • 'Obfuscate' Skript, indem sie es von so viel wie möglich Leerzeichen Strippen.

    $ perltidy --mangle scipt.pl
    

Wie bei den meisten Dingen, wenn Sie suchen CPAN , haben Sie Ihre Antwort schneller, als es Sie Stack-Überlauf anmelden nimmt. :)

In diesem Fall ist es Perl :: Tidy als andere Menschen haben bereits erwähnt. Wir haben etwas mehr Beratung über diese in Effektive Perl Programmierung zu.

Sie können auch Online-Tool verwenden http://www.cleancss.com/perl-beautify/ .

Lizenziert unter: CC-BY-SA mit Zuschreibung
Nicht verbunden mit StackOverflow
scroll top