Select Code to Download

#!/usr/bin/perl

...
sub set_global {$global = shift}
sub get_global {$global}
sub say_global {say $global}

package Blabla;

our @ISA = qw[Exporter];
use Exporter();
our @EXPORT = qw[$global1 $global2 $global3];

use Blabla;