X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FNum2text.pm;h=15575c356138ce4e6950c18d0be503a0c3058723;hb=723a11583380d2cef883c12f654d6a35bffee83b;hp=f38f10849ad27cd798f1525d35938404f2f917f3;hpb=181ce4f5bab35c1f270a192f062cd27cd34060ba;p=kivitendo-erp.git diff --git a/SL/Num2text.pm b/SL/Num2text.pm index f38f10849..15575c356 100644 --- a/SL/Num2text.pm +++ b/SL/Num2text.pm @@ -32,6 +32,8 @@ # #===================================================================== +use strict; + sub init { my $self = shift; @@ -129,7 +131,7 @@ sub num2text { # add thousand, million if ($i) { - $num = 10**($i * 3); + my $num = 10**($i * 3); push(@textnumber, $self->{numbername}{$num}); }