use YourModule qw(:DEFAULT collect @list);

##</code><code>##

package YourModule;

use strict;
use warnings;
use Exporter;

BEGIN { $Exporter::Verbose = 1; }

our (@ISA, @EXPORT, @EXPORT_OK);

BEGIN {
       require Exporter;
       @ISA = qw(Exporter);
       @EXPORT = qw(shuffle @card_deck);
       @EXPORT_OK = qw(collect @list);
}

use YourModule qw(:DEFAULT collect @list);

our @list = qw(ace jack queen king);

sub shuffle {
       return "shuffle is done\n";
}

sub distribute {
       return "distribute is OK\n";
}

sub collect {
       return "collect is finished\n";
}