Nee, so nicht. Du solltest schon aus Sicherheit absolute Pfade benutzen für das Programm.
Und dann eine Shell öffnen mit qx? Oha!
Im Taintmode hätte da dein Perl schon geschimpft.

Wieso liest du nicht $PATH ein, splittest den nach : auf und suchst dort nach der Datei tput und testest die auf -f && -x?
Ich finde das weniger risikoreich.
File::Find ist doch nett dafür, wenn du nicht Verzeichnisse selber öffnen willst.
ist laut tinita seit 2002 im core.
Last edited: 2019-08-27 18:26:25 +0200 (CEST)