Block in $ suchen und Treffer ersetzen? (Perl/CGI)

[thread]14312[/thread]

Block in $ suchen und Treffer ersetzen?

Leser: 20

Articles: hide open all | hide show old branches

+9 replies
umbrella

2009-11-29 13:15
User since
2009-09-01
24 Artikel
BenutzerIn
Hallo Leute,

ich komme gleich auf den Punkt.
Ich suche eine Möglichkeit im Datentyp Skalar, einen Text Block zu suchen und den mit einem Regulären Ausdruck zu ersetzen.

Noch ein wenig genauer …
Ich wollte für ein Formular einen Code Button zu Verführung stellen, in dem dann beim abspeichern, der Code farblich gestaltet wird (Syntax Highlighting).

Die Tags sind \[code\] … \[\/code\]
Beispiel für einen Regulären Ausdruck …
Code (perl): (dl )

$text =~ s/my/<span class=\"bbcode3\">my<\/span>/g;
Jetzt ist meine Frage, ist es irgendwie möglich, die Tags \[code\] … \[\/code\] in einem Skalar Datentyp zu suchen und den gefundenen Code-Text dann, mit den entsprechenden Ausdrücken, zu ersetzen?

lg, -umbrella
Last edited: 2009-11-29 13:34:02 +0100 (CET)
Wer sich stets zu viel geschont hat, der kränkelt zuletzt an seiner vielen Schonung. Gelobt sei, was hart macht!
- renee
  
  2009-11-29 13:24
  User since
  2003-08-04
  14371 Artikel
  ModeratorIn
  Ich würde dazu ein Modul benutzen, z.B. Parse::BBCode:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
  
  #!/usr/bin/perl use strict; use warnings; use Parse::BBCode; # erzeuge neues Parse::BBCode Objekt my $parser = Parse::BBCode->new({ # definiere Tags, die Du verarbeiten willst tags => { # [ code ][ /code ] soll verarbeitet werden code => sub { my ($parser,$attr,$content) = @_; return '<tt>' . $content . '</tt>'; }, }, }); # ohne die Leerzeichen in den BB-Tags my $text = 'Irgendein langer text mit [ code]#/usr/bin/perl[ /code]'; my $parsed = $parser->render( $text ); print $parsed; # Irgendein langer text mit <tt>#/usr/bin/perl</tt>
  
  Last edited: 2009-11-29 13:26:05 +0100 (CET)
  OTRS-Erweiterungen (http://feature-addons.de/)
  Frankfurt Perlmongers (http://frankfurt.pm/)
  --
  
  Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
  Perl-Entwicklung: http://perl-services.de/
- +7 replies
- GwenDragon
  
  2009-11-29 13:27
  User since
  2005-01-17
  14555 Artikel
  Admin1
  Code (perl): (dl )
  
  $text =~ s/\[code\]([^[]*)\[\/code\]/<span class=\"bbcode3\">\1<\/span>/g;
  
  Aber so unproblematisch ist das Parsen von verschachtelten BBCode mit Regexes auch nicht.
  
  Es gibt mehrere Perl-Module zu Parsen von BBCode: BBCode-Parser, Parse-BBCode
  
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
  - +6 replies
  - umbrella
    
    2009-11-29 13:39
    
    User since
    2009-09-01
    24 Artikel
    BenutzerIn
    
    Hallo Ihr beiden :)
    
    Danke Euch, für die schnelle Hilfe. :)
    Werde die Vorschläge gleich mal testen, sieht auf jeden Fall schon mal gut aus.
    
    lg, -umbrella
    Last edited: 2009-11-29 13:42:57 +0100 (CET)
    Wer sich stets zu viel geschont hat, der kränkelt zuletzt an seiner vielen Schonung. Gelobt sei, was hart macht!
    - +5 replies
    - umbrella
      
      2009-11-29 23:31
      
      User since
      2009-09-01
      24 Artikel
      BenutzerIn
      
      Hallo :)
      
      BB-Code ist fertig - aber eine Frage habe ich dazu noch mal.
      
      Habe mal ein Screenshot gemacht …
      http://img138.imageshack.us/img138/3017/tretertert...
      Auf dem Foto ist jetzt der graue Kasten zu sehen, der mit \[code\] … \[\/code\], erstellt wird.
      
      Code (perl): (dl )
      
      $text =~ s/(\[code\])(.+?)(\[\/code\])/<div class=\"bbcode2\"><br\/><tt>$2<\/tt><br\/><br\/><\/div>/isg;
      
      Kennt jemand dafür einen einfachen Syntax Highlighter, der den Code im Code-Tag Bereich, highlightet?
      
      lg, -umbrella
      Wer sich stets zu viel geschont hat, der kränkelt zuletzt an seiner vielen Schonung. Gelobt sei, was hart macht!
      - +4 replies
      - GwenDragon
        
        2009-11-30 13:07
        
        User since
        2005-01-17
        14555 Artikel
        Admin1
        
        Nur für Perl? Oder mehr Sprachen?
        die Drachin, Gwendolyn
        
        Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
        
        +3 replies
        
        umbrella
        
        2009-12-01 11:41
        
        User since
        2009-09-01
        24 Artikel
        BenutzerIn
        
        2009-11-30T12:07:30 GwenDragon
        Nur für Perl? Oder mehr Sprachen?
        
        Eigentlich nur Perl - Css, Sql, Js, (Html), wären auch nicht schlecht, sind aber nicht wichtig.
        
        Hallo GwenDragon,
        
        ich habe selber schon intensive gesucht aber alles was ich bisher gefunden hatte,
        ist für mich nicht mal ebenso umsetzbar - Zu schwer oder Lizenz war nicht eindeutig...
        
        Mein Problem ist ganz einfach, das mir die Textverarbeitung mit Perl noch ziemlich schwer fällt.
        
        lg, -umbrella
        Wer sich stets zu viel geschont hat, der kränkelt zuletzt an seiner vielen Schonung. Gelobt sei, was hart macht!
        
        +2 replies
        
        pq
        
        2009-12-01 12:05
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        dieses forum hier hat ja auch einen highlighter.
        der quellcode ist offen einsehbar und unten verlinkt.
        es wird momentan "source-highlight" verwendet. das ist bei debian z.b. dabei.
        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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        umbrella
        
        2009-12-01 12:53
        
        User since
        2009-09-01
        24 Artikel
        BenutzerIn
        
        Hallo pq,
        
        unter meinem System kann ich, GNU Source-highlight schnell nach installieren.
        Dann werde ich das erstmal local üben. :)
        OK, mal sehen wie ich damit zurecht komme? :)
        Wie ich das dann später auf meinem Webspace realisiere, ist eine andere Geschichte.
        
        Danke Dir erstmal. :)
        
        lg, -umbrella
        Wer sich stets zu viel geschont hat, der kränkelt zuletzt an seiner vielen Schonung. Gelobt sei, was hart macht!

View all threads created 2009-11-29 13:15.