##
$size_class = $size ? int( log($size) / log(2) ) : -1;
# red light on, possible error caused by floating point arithmetic
####
bash $ diff <( perl -E 'say int( log(2**$_) / log(2) ) for 1 .. 2**10' ) <( seq 1 $(( 2**10 )) )
####
1024c1024
< inf
---
> 1024