Um Zahlen zu Runden haben sie mehrere Möglichkeiten.

Man den dezimalen Teil mit der Funktion int() abschneiden...

#!/usr/bin/perl -w

use strict;

my $number = 3.14;
my $num = 4.90;

print int($number) , "\n";   #wird zu 3
print int($num) , "\n";      #wird zu 4

An dieser Methode kann man erkennen das einfach die letzte Stelle abgeschnitten wurde. Was aber wenn man aber gerne bei der Zahl 4.90 auf den nächsten größeren Wert aufgerundet hätte?
Für das Aufrunden auf die nächst größere Zahl übernimmt uns die Funktion ceil(). Um diese Funktion verwenden zu können benötigen wir das POSIX-Modul...

#!/usr/bin/perl -w

use strict;
use POSIX;   #für ceil()

my $number = 3.14;
my $num = 4.90;

print ceil($number) , "\n";   #wird zu 4
print ceil($num) , "\n";      #wird zu 5

Und um die Zahl auf die nächste tiefere Ganzzahl abzurunden haben wir die Funktion floor(), für die sie ebenfalls das POSIX-Modul benötigen...

#!/usr/bin/perl -w

use strict;
use POSIX;   #für floor()

my $number = 3.14;
my $num = 4.90;

print floor($number) , "\n";   #wird zu 3
print floor($num) , "\n";      #wird zu 4