package Slave;
use strict;
use Exporter qw< import >;
use vars     qw< @EXPORT_OK $type >;
@EXPORT_OK = qw< $type >;
# ...
1;