Select Code to Download

# the "variable library", e.g. MyVars.pm

...
@array = qw(Foo Bar);
%hash = (Foo => "Bar");
1;

#!/usr/bin/perl -l
use strict;
...
print $scalar;
print "@array";
print "$_ => $hash{$_}" for keys %hash;