Функция не вызывается, а сценарий завершается.

Итак, я получил функцию RM_OBJ_P , которая вызывается из страницы меню PAGE_RM . Это работает, вы можете ввести все известные имена файлов, и если они есть в базе данных, результат будет распечатан в текстовый файл (так, как я хочу). Но если я когда-нибудь по глупости выберу какой-то «волшебный» вариант x (или X ), который должен вызвать PAGE_RM , сценарий завершится. Что я сделал не так?
(Я также пытался добиться этого, используя return 0 вместо PAGE_RM )

РЕДАКТИРОВАТЬ: Очевидно, что ввод x в качестве выбора также вызывает RM_P_ * (см. Добавленный журнал)

RM_OBJ_P() {
echo "After you have finished, you can find the file here: $ACTIVE_DB/remove.txt"
echo
if [ ! -f file.txt ] ; then
    read -p "Please enter the name of the file you'd like to check (or x to return): " CHOICE
    case "$CHOICE" in
        *) RM_P_N ;;
        x|X) PAGE_RM ;;
    esac
else
    read -p "Please enter the name of the file you'd like to check: " CHOICE
    echo "- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -" >>$ACTIVE_DB/remove.txt
    echo "If you want to remove $CHOICE, please consider this:" >>$ACTIVE_DB/remove.txt
    case "$CHOICE" in
        *) RM_P_E;;
        x|X) PAGE_RM ;;
    esac
fi
}

В случае необходимости, RM_P_N и RM_P_E оба похожи (и работают по назначению)

RM_P_*() {
echo "something gets an echo echo echo o o o" >file.txt
PATH/TO/perl_script.pl "$CHOICE" database_query >>file.txt
RM_OBJ_P
}

и, наконец, что не менее важно, PAGE_RM

PAGE_RM() {
    clear
    while :; do
        PRINT_BANNER_S
        PRINT_RM_MENU
        echo "single - view"
        echo "print  - print"
        PRINT_LINE
        echo "x      - go back"
        PRINT_LINE3
        read -p "CHOICE: " CHOICE
            case "$CHOICE" in
                s|S) RM_OBJ ;;
                p|P) RM_OBJ_P ;;
                x|X) return 0
                PRINT_LINE
            esac
    done
}

Здесь соответствующая часть журнала

+ RM_OBJ_P
+ echo 'After you have finished, you can find the file here: DB_45763/remove.txt'
+ echo
+ '[' '!' -f DB_45763/remove.txt ']'
+ read -p 'Please enter the name of the file you'\''d like to check: ' CHOICE
Please enter the name of the file you'd like to check: + echo '- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -'
+ echo 'If you want to remove x, please consider this:'
+ case "$CHOICE" in
+ RM_P_E
+ echo 'If you want to remove x, please consider this:'
+ ./files/perls/remove_object.pl x dbi:SQLite:dbname=test.sqlite '' ''