sub next_power_of_two { my %s; @s{1..shift} = (); %s =~ '/'; $'; }