in reply to Quick syntax error in 13 lines of code

My guess is you are not using something like this in your code: 
use feature "switch";

[download]

In Section Seekers of Perl Wisdom