string von hex (HTML als URI- bzw. Entities kodiert) nach ascii (Allgemeines zu Perl)

[thread]15531[/thread]

string von hex (HTML als URI- bzw. Entities kodiert) nach ascii

Leser: 15

Articles: hide open all | hide show old branches

+4 replies
hilmix

2010-10-14 09:47
User since
2010-09-01
6 Artikel
BenutzerIn
Moin allerseits,

habe eine csv-Datei mit einigen hundert Datensätzen:
Code: (dl )

1 2 3 4 5 6 7 8

"Hans-Jürgen Behncke","Hans-Jürgen Behncke","Friedrich-Franz-Str. 21"," 19303 Dömitz","Deutschland","Telefon: (+49) 038758 / 22543‎","Fax: (+49) 038758 / 22563","<a href="mailto:%62%65%68%6e%63%6b%65-%64%6f%65%6d%69%74%7a@%77%65%62.%64%65" >E-Mail</a>" ; "Zweiradhandel NICKEL"," Lange Straße 22"," 19370 Parchim","Deutschland","Telefon: (+49) 03871 / 212864","Fax: (+49) 03871/ 606850","<a href="mailto:%42%69%72%67%65%72%4e%69%63%6b%65%6c@%74-%6f%6e%6c%69%6e%65.%64%65" >E-Mail</a>" ; "Fahrrad Fricke","Thomas Stein","Lindenstrasse 39"," 19370 Parchim","Deutschland","Telefon: (+49) 03871 / 213591‎","Fax: (+49) 03871 / 213599","<a href="mailto:%69%6e%66%6f@%66%61%68%72%72%61%64-%66%72%69%63%6b%65.%64%65" >E-Mail</a>" ;
Wie kriege ich die Datei eingelesen und den string mit der email decoded? btw. bin immer noch recht frisch in der Thematik, deshalb bitte ein wenig Geduld. Danke!

//Modedit GwenDragon: Titel ergänzt
Last edited: 2010-10-14 17:36:01 +0200 (CEST)
- +2 replies
- pq
  
  2010-10-14 10:00
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  was genau kannst du denn schon und was nicht? dateien öffnen? CSV parsen (dafür gibt es module)?
  zum parsen des CSV: Text::CSV z.b.
  
  zum dekodieren HTML::Entities und URI::Escape
  
  edit: es lohnt sich übrigens immer mal, die neuesten threads in der 24h-ansicht mitzuverfolgen. gerade gestern hab ich in einem thread code gepostet, der mit Text::CSV arbeitet.
  
  indem ich selbst im laufe der jahre im usenet und perl-foren mitgelesen habe, habe ich mir wohl einen grossteil meines perlwissens angeeignet.
  Last edited: 2010-10-14 10:02:39 +0200 (CEST)
  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
  - hilmix
    
    2010-10-14 14:21
    
    User since
    2010-09-01
    6 Artikel
    BenutzerIn
    
    Ich tu mir jetzt erstmal das perlopentut rein. Stehe dummerweise ziemlich unter Zeitdruck. Danke jedenfalls, melde mich wieder.
    
    thnx
    h
- GwenDragon
  
  2010-10-14 10:02
  
  User since
  2005-01-17
  14598 Artikel
  Admin1
  
  Zum Öffnen einer Datei schau dir bitte perlopentut den Abschnitt Einfaches Öffnen an.
  Dekodieren des CSV verwende die Funktion getline von Text::CSV.
  Für den Maillink (&#....;) die Funktion decode_entities von HTML::Entities oder uri_unescape von URI::Escape für die %...
  
  Ich erkläre das mal in der Struktur:
  
  Öffne Datei
  Schleife: Lese Zeile (solange nicht Dateiende)
  Dekodiere CSV nach Array von Zeichenketten (einzelne Felder der CSV-Daten)
  Dekodiere das letzte Feld (Mail-Link) aus dem Array
  Schließe Datei
  
  Frage einfach weiter, wenn du mit dem Probieren nicht zurechtkommst. Nur keien Angst. ;)
  Wie genau dein Wissenstand ist weiß ich ja nicht.
  Last edited: 2010-10-14 17:42:09 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2010-10-14 09:47.