Perl does not have a 'switch/case' statement, and you're not specifying any module that does. You cannot simply copy a shell script, add in some curly braces, and expect it to work in Perl.
In reply to Re: Need help: Getopt
by oko1
in thread Need help: Getopt
by bh_perl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |