for ($topic) {
    check $_ or last;
    test $_ or last;
    verify $_ or last;
}

given ($topic) {
    when … $_ …
}