diff --git a/scripts/explore.pl b/scripts/explore.pl
index 4a16ed0..7b2725d 100644
--- a/scripts/explore.pl
+++ b/scripts/explore.pl
@@ -133,7 +133,7 @@ sub filter_marker_values {
 }
 
 # How much to disassemble around the address / how many lines to show
-my $region_size     = $cui->height() / 2 - 2;
+my $region_size     = int( $cui->height() / 2 ) - 2;
 my $asm_region_size = $region_size + 120;
 
 my %assembly_cache;