if ($choice1 =~ /j/i)