Your last else() should be an elsif() like the others. You can't have else(condition).
Also, perl might require you to use double quotes around $race eq 'something', I'm not sure. In most languages that I know, single quotes denotes a single character, double quotes a string.
|