got rid of given/when

Replaced given/when in sbosnap with if/elsif clauses, since given/when has
been made experimental with a warning in newer perl versions.