Select Code to Download

   #!perl;

...
   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";

   package Fleece;

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

   1;

Global symbol "$fleece" requires explicit package name at testuse.pl l
+ine 11.
Execution of testuse.pl aborted due to compilation errors.