package data; use strict; use warnings; require Exporter; our @ISA = qw(Exporter); our @EXPORT = (); our @EXPORT_OK = qw($variable1 $variable2); our %EXPORT_TAGS = (all => [@EXPORT_OK]); our $variable1 = 'Test'; our $variable2 = 'Hallo';