##
while ($a < $b) if not $error
{ $a++; }
####
$a++ while ! $error && $a < $b;
if ( ! $error ) {
$a++ while $a < $b;
}
do { $a++ while $a < $b } if ! $error;
####
$a++ while not $error || $a >= $b;
$a = $b unless $error or $a >= $b;