use vars qw( $VERSION );
use version; $VERSION = qv( (qw$Revision: 1.1 $)[-1] );