my $num = 17;
my $nlog = 2**(int(log($num)/log(2))+1);
print $nlog;