$ perl -MO=Deparse -e 'while ($i<$entry){$i = $entry (2/3)}'
syntax error at -e line 1, near "$entry ("
-e had compilation errors.
while ($i < $entry) {
    ;
}