Select Code to Download

package MyModule;

...
# All cases    
my @rray = (1, 2, 3, 4);
1;

use strict;

...
# case 3
use MyModule qw(@rray);
print scalar(@rray);