######################################################################
# Obscure.pm
######################################################################
# Perl Power! - Michael Schilli 1998
######################################################################

package Obscure;

use Carp;                     # include Carp

sub obscure {
    carp "obscure warning";   # trigger warning
}

1;