A Module That Exports a Function

         package Cookout;

         # Always export `grill':
         sub import {
           # Get name of calling package
           my $caller = caller;

           *{$caller . '::grill} = \&grill;
         }

Now any other package can say

        use Cookout;

        grill('corn', 'burgers', 'kebabs');