Aus Text "&nbsp (ctrl+shift+leer), &quote,.." o.a. entfernen ? (gelöst) (Allgemeines zu Perl)

[thread]19064[/thread]

Aus Text "&nbsp (ctrl+shift+leer), &quote,.." o.a. entfernen ? [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 11

Articles: hide open all | hide show old branches

Teilbaum:
Funktionieret nicht s. mein Hinweis davor. (16 Artikel) 2014-05-03 12:42

+24 replies
kezall

2014-05-02 08:30

User since
2014-03-18
84 Artikel
BenutzerIn

Hallo Perles,
möchte gerne mehrfache &nbsp und &quote aus vielen(!) *.txt entfernen. Vermutlich mit Regex(p). Kann mir bitte jemand sagen wie (=~ m/../g)? Danke.
- bianca
  
  2014-05-02 08:38
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Mit $text =~ s/ //g; und $text =~ s/&quote;//g; sollte das gehen.
  10 print "Hallo"
  20 goto 10
- +18 replies
- GwenDragon
  
  2014-05-02 08:57
  User since
  2005-01-17
  14758 Artikel
  Admin1
  Das geht in einem Rutsch mit:
  
  Code (perl): (dl )
  
  $text =~ s/&(nbsp|quote);//g;
  
  Das s ist der Ersetzungsoperator.
  Last edited: 2014-05-02 09:06:11 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - kezall
    
    2014-05-02 09:14
    
    Subtree with 17 replies: Funktionieret nicht s. mein Hinweis davor.
    
    User since
    2014-03-18
    84 Artikel
    BenutzerIn
    
    Danke euch beiden, für die super schnelle Antwort. *
    Bedingt durch Ooo (zuvor), kommt ziemlich oft in den Texten nach Punk oder Komma kein Blank. Könnte man es mit =~ s/\.(?! )/\. /g; zu recht biegen? Oder geht es irgendwie besser?
    
    * Hinweis: leider greifen die Vorschläge nicht. Mit OpenOffice geöffnete *.txt zeigt nach wie vor d.h. unbeirrt alle an. Manuell S&E geht aber leider nicht zumutbar.
    Last edited: 2014-05-02 09:35:04 +0200 (CEST)
- +4 replies
- GwenDragon
  
  2014-05-02 16:25
  User since
  2005-01-17
  14758 Artikel
  Admin1
  nachdem du auch das echte Zeichen für ein Non-Breaking Space (Geschütztes Leerzeichen) ersetzen willst:
  
  Code (perl): (dl )
  
  $text =~ s/\x0A|&(nbsp|quote);//g;
  
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +3 replies
  - kezall
    
    2014-05-02 17:00
    
    User since
    2014-03-18
    84 Artikel
    BenutzerIn
    
    Danke, werde es noch pur also ohne quote testen.
    Die 'Teilung' x0A ist mir irgendwie noch schwach in Erinnerung. Aber auch so läuft es leider nicht. Liegt es vermutlich am fehlendem use Etwas::Etwas? \#0160 brachte leichte Änderung des Zeichen zu (? in LibreOffice Menü: Markierungen, Ctrl+F8)), aber mehr nicht.
    
    P.S:
    Die kurze Datei kann zur verfügung gestellt werden.
    
    Nachtrag: nachdem ich die lösung für Text-Dateien gefunden habe, bekam ich eine Erleuchtung/Vermutung, dass dein Vorschlag wohl für HTML-Datei gilt! Tatsächlich - absolut perfekt. Unsere Standpunkte waren unterschiedlich. Somit habe ich zusätzlich auch eine Text-Lösung parat. Wahrlich - Vielen Dank.
    Last edited: 2014-05-03 11:51:56 +0200 (CEST)
    - +2 replies
    - GwenDragon
      
      2014-05-03 12:43
      
      User since
      2005-01-17
      14758 Artikel
      Admin1
      
      Magst du alle hier an deiner Lösung teilhaben zu lassen? Andere Programmierende interessiert das auch, wo es hakt und wie das umschifft wird ;)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - kezall
        
        2014-05-03 14:59
        
        User since
        2014-03-18
        84 Artikel
        BenutzerIn
        
        Kein Problem, nur es sollte sicher sein, dass es hier nicht um *.html pur sondern um konvertierte (html2text) also *.html to *.txt. Nur befürchte ich, dass es nicht der Rede wert ist. Außer vieleicht bei Leuten wie ich selbst bin. Es war nur eine winzige Umstellung des Bekannten. Allerdings könnte es für weitere Adäquate behilflich sein und Zeit sparen. Denn schon die 'Beschreibung' bringt das Stereotype zum Wackeln ((;-o
        Q: wie soll dieses gegebenfalls Zustande kommen?

View all threads created 2014-05-02 08:30.