okuの日記: PIP
日記 by
oku
なんだかんだ必要であったりするのでサクサクっと ksh で PIP を書いてしまいました。
#!/usr/bin/ksh
set -A opts
set -A srcs
end_of_opts=""
optc=0
srcc=0
dest=""
for O in "$@"
do
case "$O"
in
-*)
if [ "$end_of_opts" = "Y" ]
then
if [ -z "$dest" ]
then
dest="$O"
else
srcs[${srcc}]="$O"
srcc=$((srcc + 1))
fi
elif [ "$O" = "--" ]
then
end_of_opts="Y"
else
opts[${optc}]="$O"
optc=$((optc + 1))
fi
;;
*)
if [ -z "$dest" ]
then
dest="$O"
else
srcs[${srcc}]="$O"
srcc=$((srcc + 1))
fi
;;
esac
done
exec cp "${opts[@]}" "${srcs[@]}" "$dest"
みたいな感じで。
今時、PIP を知っている人がどれぐらいいるのか、というのは不問に付してください。
#!/usr/bin/ksh
set -A opts
set -A srcs
end_of_opts=""
optc=0
srcc=0
dest=""
for O in "$@"
do
case "$O"
in
-*)
if [ "$end_of_opts" = "Y" ]
then
if [ -z "$dest" ]
then
dest="$O"
else
srcs[${srcc}]="$O"
srcc=$((srcc + 1))
fi
elif [ "$O" = "--" ]
then
end_of_opts="Y"
else
opts[${optc}]="$O"
optc=$((optc + 1))
fi
;;
*)
if [ -z "$dest" ]
then
dest="$O"
else
srcs[${srcc}]="$O"
srcc=$((srcc + 1))
fi
;;
esac
done
exec cp "${opts[@]}" "${srcs[@]}" "$dest"
みたいな感じで。
今時、PIP を知っている人がどれぐらいいるのか、というのは不問に付してください。
PIP More ログイン