Thread perl einzeiler (12 answers)
Opened by micneu at 2011-11-02 13:57

micneu
 2011-11-03 11:45
#153794 #153794
User since
2008-11-27
13 Artikel
BenutzerIn
[default_avatar]
als danke erstmal, ich habe deinen code in meinen integriert:
Code: (dl )
ldapsearch -x "(mail=*)" mail | grep "mail.*@" | perl -n -l -F. -e 's/mail:\s//g; {my (@arr) = $_ =~ /(.+)\.(.+)\@(.+)/; if (@arr) { print $arr[-3] } if $_ =~ /.*\..*@/}' | less

nur bekomme ich jetzt eine fehler meldung:

syntax error at -e line 1, near "if $_ "
Execution of -e aborted due to compilation errors.

an welcher position muss dein code schnippsel eingefügt werden?

View full thread perl einzeiler