2013-07-16T06:46:09 bora99

Quote

Ich würde es so schreiben (ungetestet):

Code: (dl )

perl -len 'print $1 if /^\s*key\s+=\s+([A-Z0-9]{4})\b/'

funktioniert leider nicht

Code: (dl )

perl -lan -e 'if(/^(\s*)key\s+=\s([A-Z0-9]{4})\b/i) {print "$F[2]" }'

diese variante von mir funktioniert !

Statt -len müssen die Kommandline-Optionen -ln -e sein. Dann funktioniert es.