#!/bin/rc -e
rfork e
fn usage {
	echo usage:  >[1=2]
	exit 'usage'
}

n=1
low=1
high=9999
cmd=mv
prefix=()
pprefix=()

while(~ $1 -*){
	switch($1){
	case -l
		low=$2
		shift
	case -h
		high=$2
		shift
	case -c
		cmd=$2
		shift
	case -p
		pprefix=$2
		shift
	case *
		usage
	}
	shift
}
nums=`{seq -w $low $high}

for(i in $*){
	prefix=$nums($n)
	if(~ $"prefix '')
		exit
	awk '{n=split($0, arr, "."); printf "%s ''%s'' ''%s%s.%s''\n", ENVIRON["cmd"], $0, ENVIRON["pprefix"], ENVIRON["prefix"], arr[n]}' /env/i
	n=`{echo $n^+1 | bc}
}