use POSIX qw( ceil );
my $rounded = ceil($num*2)/2;