print OFILE "static const struct enum_struct einfo_" . $name . "[] = {\n";
my(@enums) = split(/,/s, $elements);
- for (my($i)=0; $i <= $#{@enums}; $i++) {
+ for (my($i)=0; $i <= $#enums; $i++) {
my($enum) = $enums[$i];
if ($enum =~ /\s*(\w*)/) {
my($e) = $1;