Add 96_swap_case to perl solutions