#!/usr/bin/perl -w

use strict;
# BEGIN { print(($INC{'Carp.pm'}||"not defined"), "\n")}
use MyCarp;
# BEGIN { print(($INC{'Carp.pm'}||"not defined"), "\n")}
use Fibble;
# BEGIN { print(($INC{'Carp.pm'}||"not defined"), "\n")}

Fibble::foo();