silence Perl warning - Switch module is deprecated