my @array = qw/one two three four five/;
print scalar @array;
__OUTPUT__
5