@array = qw(foo bar);
$length = scalar @array;