You may be getting bitten by buffering. Try this:

$|++; # force auto-flush (see perldoc perlvar)

while (1) {
  if ($cond == 1) {
    print "1\n";
  } else {
    print "2\n";
  }
  sleep 10;
}
[download]

Cheers,
Shendal