Suche Regex - #126112 (Allgemeines zu Perl)

Gast LanXoff

2009-09-23 15:43

Guest xAmp
Hat jemand eine Idee?

ja, noch eine 8)

Code (perl): (dl )

$neu= do { my $_=$text2; s/y//; /^\w{13}/; $&}

vermutlich ist folgendes auf lange sicht performanter:

Code (perl): (dl )

$neu= do { my $_=$text2; s/y//; /^(\w{13})/; $1}