#!/usr/bin/perl

use strict;
use warnings;
use v5.10;
sub YadaYada {
    say "YadaYada";
     };
use Xyzzy (\&YadaYada);

say "Executing ".__PACKAGE__;
INIT { say __PACKAGE__."::INIT"; };
END { say __PACKAGE__."::END"; };