package moduleA;

@ISA = qw(Exporter);
@EXPORT_OK = qw($readMode $writeMode $appendMode openFile);
$readMode = '';
$writeMode = '>';
...
1;