$num_of_columns=@data;

##</code><code>##

$num_of_columns= scalar( @data );