Kaufmännisch korrekt runden (gelöst) - #129228 (Allgemeines zu Perl)

2009-12-11 17:31

User since
2003-08-04
12209 Artikel
Admin1

Code (perl): (dl )

1
2

# ungetestet
length $vorkomma > 0 and $vorkomma =~ s/^0+//;

wieso entfernst du immer nur eine 0 und wieso matchtst du erst und benutzt dann substr?

edit: achso, die variable soll *danach* mindestens länge eins haben.

Code (perl): (dl )

$vorkomma =~ s/^0+([^0])/$1/;

Last edited: 2009-12-11 17:33:07 +0100 (CET)

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: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem