#!/usr/bin/perl
use strict;

use Foo;

my $bar = Bar->new();       # Works because Bar is loaded by Foo