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';

#!/usr/bin/perl

use strict;
use warnings;
use lib qw(.);
use data qw(:all);

print $variable2," ",$variable1,"\n";