$a = ; while ($b = ) { if (($a cmp $b) > 0) return false; $a = $b; } return true;