What does the following Perl code print?

Package: Use Base image