sub between {
        return ($_[0] < $_[1]) ? ($_[2] >= $_[0] && $_[2] <= $_[1]) : ($_[2] >= $_[1] && $_[2] <= $_[0]);
}