Select Code to Download

use a qw( $x $z );

"$z" is not exported by the a module
Can't continue after import errors at -e line 1

package a;
require Exporter;
...
our @EXPORT_OK= qw( $x );
our $x= 'x';
1;