Zeilenumbruch erzwingen - #74792 (Allgemeines zu Perl)

renee

2007-03-06 10:53

User since
2003-08-04
14371 Artikel
ModeratorIn

Als Einzeiler:

Code: (dl )

perl -ne 's!(</irgendeinInhalt>)!$1\n!g; print ' < entwicklung/test.xml

test.xml:

Code: (dl )

1
2

 Das ist ein Test </irgendeinInhalt> asdljlasdf  </irgendeinInhalt> alskdjfpqweirumvasdf  </irgendeinInhalt> asdlfjasdföjasdf  </irgendeinInhalt>
 asdfkjökjw2oi </irgendeinInhalt>  </irgendeinInhalt>asldfj </irgendeinInhalt>

Ausgabe:

Code: (dl )

~ 2> perl -ne 's!(</irgendeinInhalt>)!$1\n!g; print ' < entwicklung/regex.pl 
 Das ist ein Test </irgendeinInhalt>
 asdljlasdf  </irgendeinInhalt>
 alskdjfpqweirumvasdf  </irgendeinInhalt>
 asdlfjasdföjasdf  </irgendeinInhalt>

 asdfkjökjw2oi </irgendeinInhalt>
  </irgendeinInhalt>
asldfj </irgendeinInhalt>

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/