#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

package Foo;
1;

package main;
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";