Opened by ottto at 2012-06-06 14:26
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
wenn es nur bestimmte variablen sind, lässt sich das am einfachsten und sichersten mit einem hash lösen.
ein weiterer tipp:
benutze strict und warnings:
use strict und lexikalische filehandles: WasIsteinLexikalischerFileHandle
lerne modernes perl: http://perl-tutorial.org/
Last edited: 2012-06-06 14:33:26 +0200 (CEST)
Code (perl): (dl
)
1 2 3 4 5 6 7 8
my %map = ( var1 => "0815", ... ); my $re = join '|', sort { length($b) <=> length($a) } keys %map; # var1|var2|... $line =~ s/($re)/$map{ $1 }/g;
ein weiterer tipp:
benutze strict und warnings:
use strict und lexikalische filehandles: WasIsteinLexikalischerFileHandlelerne modernes perl: http://perl-tutorial.org/
Last edited: 2012-06-06 14:33:26 +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
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem