if($count < 5)
    {
        ...
    }
    else
    {
        print "$pos ... \n";
        $count = 0;
        @data  = ();
    }