ファイル名の点を変更して下線で置き換えて、拡張子を変更せずにそのままにするために使用したいbashスクリプトがあります(btw、私はCentos 6を使用しています)。以下の出力に示すように、置き換える必要がある点がある場合はスクリプトが機能しますが、唯一の点が拡張子の場合、スクリプトはファイルを無視するのではなくファイル名を変更しようとします。私がこの問題をどのようによりよく処理するかを指摘できる人はいますか?助けてくれてありがとう。
私の(間違った)スクリプト:
#!/bin/bash
for THISFILE in *
do
filename=${THISFILE%\.*}
extension=${THISFILE##*\.}
newname=${filename//./_}
echo "mv $THISFILE ${newname}.${extension}"
#mv $THISFILE ${newname}.${extension}
done
入力例:
1.3MN-Pin-Eurotunnel-Stw505.51.024-EGS-130x130.jpg
Wear-Plates.jpg
出力:
mv 1_3MN-Pin-Eurotunnel-Stw505_51_024-EGS1-130x130.jpg 1_3MN-Pin-Eurotunnel-Stw505_51_024-EGS1-130x130.jpg
mv Wear-Plates_jpg.Wear-Plates_jpg Wear-Plates_jpg.Wear-Plates_jpg
答え1
私はこのプログラムがあなたが望むことをすると信じています。テストしてみると、いくつかの興味深いケース(例:拡張がまったくない場合)で動作します。
#!/bin/bash
for fname in *; do
name="${fname%\.*}"
extension="${fname#$name}"
newname="${name//./_}"
newfname="$newname""$extension"
if [ "$fname" != "$newfname" ]; then
echo mv "$fname" "$newfname"
#mv "$fname" "$newfname"
fi
done
直面する主な問題は、拡張機能が目的##
のタスクを実行しないことです。私はいつもbashのシェルパラメータ拡張が一種の黒魔法だと思いました。マニュアルの説明は完全には明確ではなく、拡張機能がどのように機能するかについてのサポート例がありません。彼らはまた非常に不思議です。
sed
個人的には、私は好きな方法で名前を変更する小さなスクリプトを作成するか、またはperl
全体的な操作を実行する小さなスクリプトを作成します。答えた他の人もこのアプローチをとりました。
私が指摘したいもう一つのことは、引用を使用することです。私はシェルスクリプトで何かをするたびに、人々に引用するときに非常に注意してください。シェルスクリプトの問題の最大の原因は、シェルが解釈すべきではないことを解釈することです。そして引用規則は明らかではありません。私はこのシェルスクリプトに引用の問題がないと思います。
答え2
使用しますfor thisfile in *.*.*
(つまり、名前に複数のドットが含まれるループファイル)。変数を引用し、それを使用して--
以下のようにオプションの終わりを表示します。mv -- "$thisfile" "$newname.$extension"
zshを使用してください。
autoload -U zmv
zmv '(*).(*)' '${1//./_}.$2'
答え3
これはどうですか:
perl -e '
@files = grep {-f} glob "*";
@old_files = @files;
map {
s!(.*)\.!$1/!;
s!\.!_!g;
s!/!.!
} @files;
rename $old_files[$_] => $files[$_] for (0..$#files)
'
免責事項:まず、仮想ディレクトリで試してください。まだテストしていません!
答え4
このバージョンでは、右から始めて、維持したいポイントの数を明示的に選択できます。
また、ドット以外の文字を置換および/または削除し、代替文字はアンダー-
スコアではありませんが、簡単に変更できます。
#!/bin/sh
# Rename files by replacing Unix-unfriendly characters.
usage () {
cat <<EOF
usage: $0 [OPTIONS] [--] [FILE [FILE...]]
Rename files by replacing Unix-unfriendly characters.
Options:
-p N preserve last N dots in filename, or keep all
dots if N < 0 (default: 1)
--help show this help and exit
EOF
}
error () {
printf "%s\n" "$1" 1>&2
}
delete_chars="()[]{}*?!^~%\\\<>&\$#|'\`\""
replace_chars=" _.,;-"
unixify_string () (
printf '%s\n' "$1" \
| tr -d "$delete_chars" \
| tr -s "$replace_chars" - \
| to_lower \
| sed 's/^-\(.\)/\1/; s/\(.\)-$/\1/'
)
to_lower () {
sed 's/.*/\L&/'
}
split () (
# split '.x.x.x.x' 0 -> '/x.x.x.x.x
# split '.x.x.x.x' 1 -> '/x.x.x.x/x
# split '.x.x.x.x' 2 -> '/x.x.x/x/x
# split '.x.x.x.x' -1 -> '/x/x/x/x/x
nf=$(printf '%s\n' "$1" | tr -d -C . | wc -c)
if [ $2 -lt 0 ]; then
keep=0
else
keep=$((nf-$2))
fi
IFS=. i=0 out= sep=
for part in $1; do
out="$out$sep$part"
if [ -z "$out" -o $i -ge $keep ]; then
sep=/
else
sep=.
fi
i=$(($i+1))
done
printf '%s\n' "$out"
)
unixify () (
IFS=/ out= sep=
for part in $(split "$1" $2); do
out="$out$sep$(unixify_string "$part")"
sep=.
done
printf '%s\n' "$out"
)
rename_maybe () (
dir="$(dirname "$1")"
name="$(basename "$1")"
newname="$(unixify "$name" $2)"
if [ "$newname" != "$name" ]; then
mv -i "$dir/$name" "$dir/$newname"
fi
)
# command line arguments
short_opts=p:
long_opts=help
args="$(LC_ALL=C getopt -n "$0" -s sh -o $short_opts -l $long_opts -- "$@")"
if [ $? -eq 0 ]; then
eval set -- "$args"
else
exit 1
fi
p=
while [ $# -gt 0 ]; do
case "$1" in
--help)
usage; exit 0 ;;
-p)
p="$2"; shift
if ! [ "$p" -eq "$p" ] 2> /dev/null; then
error "$0: option requires integer argument -- 'p'"
exit 1
fi ;;
--)
shift; break ;;
-*)
error "$0: illegal option -- '$1'"
exit 1 ;;
*)
break
esac
shift
done
# defaults
p=${p:-1}
# echo p=$p
# echo "$@"
# echo n=$#
# exit
if [ $# -lt 1 ]; then
error "$0: required non-option argument missing"
exit 1
fi
for file in "$@"; do
rename_maybe "$file" $p
done