$count++;
@z =split('', $line);
$count = @z;