while (my $var = ) {} # or similar