[Chas]

Well, it looks like it should be printing the 'x' on every iteration to me. Try turning on autoflush and see if that helps:

Code:

#!/usr/bin/perl -w
use strict;
$| = 1; # Set autoflush to a non-zero value to turn on

# code below

When it does print the X's, is it the line of X's before or after the dif text?

~Charlie