#!perl # # package _Drivers_::IO; use strict; use warnings; use warnings::register; use vars qw($VERSION $DATE $FILE ); $VERSION = '0.02'; $DATE = '2004/05/04'; $FILE = __FILE__; __END_