Revision c510d88b
Von Sven Schöling vor mehr als 15 Jahren hinzugefügt
| SL/DATEV/KNEFile.pm | ||
|---|---|---|
|
package SL::DATEV::KNEFile;
|
||
|
|
||
|
use strict;
|
||
|
|
||
|
sub new {
|
||
|
my $type = shift;
|
||
|
my $self = {};
|
||
| ... | ... | |
|
my $self = shift;
|
||
|
my $amount = shift;
|
||
|
my $width = shift;
|
||
|
our $stellen;
|
||
|
|
||
|
$amount =~ s/-//;
|
||
|
my ($places, $decimal_places) = split m/\./, "$amount";
|
||
Auch abrufbar als: Unified diff
und die restlichen .pm Module.