package Def;
use warnings;
use strict;

use vars qw(@ISA @EXPORT $foo $bar $boo);

BEGIN{
  require Exporter;
  Exporter->import();
}

@ISA = qw(Exporter);
@EXPORT = qw($foo $bar $boo);

1;

##</code><code>##

#!/usr/bin/perl
use warnings;
use strict;
use Def;  # the variable defined module

$foo = 'you can\'t foo me';
$bar = 'Let\'t meet in the bar';
$boo = 'The fans boo you today';

 print $boo,$foo,$bar;