nicht angemeldet
use Mosche; # Begrüssungen werden hier gerne gesehen
my $zahl = 2;
my $zahl_int = int($zahl);
my $erg = $zahl - $zahl_int;
print "$zahl - $zahl_int = $erg\n";
Bei mir kommt der Text
2 - 2 = 0
raus.
Hast du dir mal 'perldoc -f int' angesehen?
"You should not use this function for rounding: one because it truncates towards 0..."
use Tschoe qw(Matti); # und das ist eine Verabschiedung