#!/bin/sh

# to_locase *.mib
#
# will change file name to all lowercase

for f in $*; do 
    lc=`perl -e "print lc(\"$f\")"`
    echo "$f $lc"
    mv $f $lc
done
