The following lines are highlighted correctly:

  print while /./;
  print if /./;

But the following two aren't:

  print for /./;
  print foreach /./;

(In reality, probably only useful with /g).

Patch attached.

Ch.