Select Code to Download

my $variable1;
open my $lib, "<", "./Library.pl" or die $!;
{ local $/; eval <$lib>; }
close $lib;
print "$variable1\n";