get-interpreter-for-file

#!/bin/bash
export TTY # shopt -s nullglob # use for 'for' loops but not for 'ls', 'grep'

# This is based on the extension, which is not nice

last_arg="${@: -1}"
fp="$last_arg"
rp="$(realpath "$fp")"
dn="$(dirname "$rp")"
cd "$dn"
bn="$(basename "$fp")"
ext="${fp##*.}"
fn="${fp%.*}"

case "$ext" in
    # hackett|hkt) { printf -- "%s\n" "$(which racket) -I hackett"; } ;; 
    hackett|hkt) { which racket; } ;; 
    rkt) { which racket; } ;; 
    hs) { which runhaskell; } ;; 
    R) { which Rscript ; } ;; 
    sh) { which sh ; } ;; 
    hy) { which hy3.6; } ;; 
    js) { which node || which nodejs; } ;; 
    rb) { which ruby; } ;; 
    wls) { which wolframscript; } ;; 
    scrbl) { which scribble; } ;; 
    py) { 
        ver="$(vermin "$fp")"
awk1 <<HEREDOC
python$ver
HEREDOC

} ;; 

    tcl) { which tclsh; } ;; 
    pl) { which perl; } ;; 
    sh) { which bash; } ;;
    *) { notify-send "$0 : create an entry for $ext here"; }
esac