42

我计划做的一件事是编写（非常简单的）Perl 脚本，我希望能够在不从终端显式调用 Perl 的情况下运行它们。我很感激，为此，我需要授予他们执行权限。使用 chmod 执行此操作很容易，但它似乎也是一个稍微费力的额外步骤。我想要的是两件事之一：

首先，有没有办法在保存文件时设置执行标志？目前我正在尝试使用 gedit 和 geany，但如果它具有此功能，我愿意切换到具有类似（或更好）功能的编辑器。

如果做不到这一点，有没有办法声明在特定目录中创建的所有文件都应该具有执行权限？

我的 umask 设置为 022，据我了解，这应该没问题，但似乎文件是作为文本文件（具有 666 个默认权限）而不是可执行文件（具有 777 个默认权限）创建的。

也许我只是懒惰，但我认为必须有一种比 chmodding 一个创建的每个脚本更方便的方法。

4

5 回答 5

85

使文件可执行：

chmod +x 文件

查找 perl 的位置：

哪个perl

这应该返回类似

/bin/perl 有时 /usr/local/bin

然后在脚本的第一行添加：

#!"path"/perl 上面的路径，例如

#!/bin/perl

然后就可以执行文件了

。/文件

PATH 可能存在一些问题，因此您可能也想更改它...

于 2009-05-03T13:48:29.027 回答
6

无需破解您的编辑器或切换编辑器。

相反，我们可以想出一个脚本来监视您的开发目录和 chmod 文件，因为它们被创建。这就是我在附加的 bash 脚本中所做的。您可能想通读评论并根据需要编辑“配置”部分，然后我建议将其放在您的 $HOME/bin/ 目录中，并将其执行添加到您的 $HOME/.login 或类似文件中。或者你可以从终端运行它。

这个脚本确实需要 inotifywait，它在 Ubuntu 的 inotify-tools 包中，

sudo apt-get install inotify-tools

欢迎提出建议/编辑/改进。

#!/usr/bin/env bash

# --- usage --- #
# Depends: 'inotifywait' available in inotify-tools on Ubuntu
# 
# Edit the 'config' section below to reflect your working directory, WORK_DIR,
# and your watched directories, WATCH_DIR. Each directory in WATCH_DIR will
# be logged by inotify and this script will 'chmod +x' any new files created
# therein. If SUBDIRS is 'TRUE' this script will watch WATCH_DIRS recursively.
# I recommend adding this script to your $HOME/.login or similar to have it
# run whenever you log into a shell, eg 'echo "watchdirs.sh &" >> ~/.login'.
# This script will only allow one instance of itself to run at a time.

# --- config --- #

WORK_DIR="$HOME/path/to/devel" # top working directory (for cleanliness?)
WATCH_DIRS=" \
    $WORK_DIR/dirA \
    $WORK_DIR/dirC \
    "                          # list of directories to watch
SUBDIRS="TRUE"                 # watch subdirectories too
NOTIFY_ARGS="-e create -q"     # watch for create events, non-verbose


# --- script starts here --- #
# probably don't need to edit beyond this point

# kill all previous instances of myself
SCRIPT="bash.*`basename $0`"
MATCHES=`ps ax | egrep $SCRIPT | grep -v grep | awk '{print $1}' | grep -v $$`
kill $MATCHES >& /dev/null

# set recursive notifications (for subdirectories)
if [ "$SUBDIRS" = "TRUE" ] ; then
    RECURSE="-r"
else
    RECURSE=""
fi

while true ; do
    # grab an event
    EVENT=`inotifywait $RECURSE $NOTIFY_ARGS $WATCH_DIRS`

    # parse the event into DIR, TAGS, FILE
    OLDIFS=$IFS ; IFS=" " ; set -- $EVENT
    E_DIR=$1
    E_TAGS=$2
    E_FILE=$3
    IFS=$OLDIFS

    # skip if it's not a file event or already executable (unlikely)
    if [ ! -f "$E_DIR$E_FILE" ] || [ -x "$E_DIR$E_FILE" ] ; then
        continue
    fi

    # set file executable
    chmod +x $E_DIR$E_FILE
done
于 2009-05-04T05:40:07.507 回答
4

您所描述的是处理此问题的正确方法。

你说你想留在 GUI 中。您通常可以通过文件属性菜单设置执行位。如果您愿意，您还可以学习如何为上下文菜单创建自定义操作来为您执行此操作。这当然取决于您的桌面环境。

如果您使用更高级的编辑器，您可以编写保存文件时要执行的操作的脚本。例如（我只对 vim 非常熟悉），您可以将其添加到您的 .vimrc 中，以使任何以 " #!/*/bin/*" 开头的新文件可执行。

au BufWritePost * if getline(1) =~ "^#!" | if getline(1) =~ "/bin/" | silent !chmod +x <afile> | endif | endif
于 2009-05-03T17:13:22.203 回答
2

这真的没什么大不了的。您可以使用单个命令制作一个脚本：

chmod a+x *.pl

并在创建 perl 文件后运行脚本。或者，您可以使用如下命令打开文件：

touch filename.pl && chmod a+x filename.pl && vi filename.pl # choose your favorite editor
于 2009-05-03T13:34:21.247 回答
0

我认为您遇到的问题是，即使您可以在系统中设置自己的 umask 值，这也不允许您通过 gedit（或您使用的任何编辑器）显式控制在新文件上设置的默认权限.

我相信这个细节是硬编码到 gedit 和大多数其他编辑器中的。您更改它的选项是（a）破解您自己的 gedit 模块或（b）找到一个文本编辑器，允许您设置新文件的默认权限首选项。（对不起，我不知道。）

鉴于此，必须对文件进行 chmod 真的不是那么糟糕，对吧？

于 2009-05-03T17:43:57.527 回答