#!perl;

   use warnings;

   use Fleece;

   my $BNAME = Mary;
   print "$BNAME had a little lamb, little lamb, little lamb,\n";
   print "$BNAME had a little lamb,\n";
   print "It's fleece was $fleece.\n";

##</code><code>##

   package Fleece;

   use strict;
   use warnings;
   use Exporter;

   $fleece = "white as snow.\n";

##</code><code>##

Global symbol "$fleece" requires explicit package name at C:/Perl/lib/Fleece.pm line 7.
Compilation failed in require at testuse.pl line 5.
BEGIN failed--compilation aborted at testuse.pl line 5.