Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
print "Data::Dumper was ", defined $Data::{'Dumper::'} ? "loaded\n" : 
+"not loaded\n";
print "Foo was ", defined $::{'Foo::'} ? "loaded\n" : "not loaded\n";
print "Eata::Dumper was ", defined $Eata::{'Dumper::'} ? "loaded\n" : 
+"not loaded\n";