if (($count % 1000) == 0 ) { print $count." watches created ...\n"; }