A função não é chamada e o script sai

Question

Então eu tenho a função RM_OBJ_P que é chamada na página de menu PAGE_RM . Isso está funcionando, você pode digitar todos os nomes de arquivos que você conhece e se eles estiverem no banco de dados, a saída será impressa em um arquivo de texto (assim como eu quero que seja). Mas se eu alguma vez escolher imprudentemente a opção "mágica" de alguma forma x (ou X ) que deve chamar PAGE_RM , o script sai. O que eu fiz de errado?
(Eu também tentei fazer isso usando return 0 em vez de PAGE_RM )

EDIT: Obviamente, inserir x como opção também chama RM_P_* (consulte log adicionado)

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
}

Caso seja importante, RM_P_N e RM_P_E são ambos assim (e funcionam como pretendido)

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
}

e por último mas não menos importante, 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
}

Aqui a parte relevante do log

+ 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 '' ''

    

Answer 1

Deixa pra lá, resolveu dessa maneira | [Bom exemplo de pensar antes de você (fala) perguntar]. Se alguém tiver uma solução melhor, fique à vontade para responder

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