#/bin/sh

mod=$1

if test "x$mod" = "x"; then
    echo "Usage: $0 <module>"
    exit
fi

/usr/bin/perl -M$mod -e "print ( \$$mod::VERSION =~ /(\d)\.(\d\d)/ )" 2>/dev/null || echo "000"

exit 0

