##
BEGIN {
require Highlander;
Highlander->import(-silent);
}
##
##
my $opt_silent;
sub import {
my $class = shift;
$opt_silent = 0;
for (@_) {
if ($_ eq -silent) {
$opt_silent = 1;
} else {
require Carp;
Carp::carp("Unrecognized symbol $_");
}
}
}