It looks like $data is undefined.

#!/bin/env perl
use strict;
use warnings;
use XML::Simple;

# From https://metacpan.org/pod/XML::Simple#QUICK-START
my $data =   {
    'logdir'        => '/var/log/foo/',
    'debugfile'     => '/tmp/foo.debug',
    'server'        => {
        'sahara'        => {
            'osversion'     => '2.6',
            'osname'        => 'solaris',
            'address'       => [ '10.0.0.101', '10.0.1.101' ]
        },
        'gobi'          => {
            'osversion'     => '6.5',
            'osname'        => 'irix',
            'address'       => [ '10.0.0.102' ]
        },
        'kalahari'      => {
            'osversion'     => '2.0.34',
            'osname'        => 'linux',
            'address'       => [ '10.0.0.103', '10.0.1.103' ]
        }
    }
};

print "XMLout with data defined:\n\n", xml_out($data), "\n\n";
#print "XMLout with data undefined:\n\n", xml_out(undef), "\n\n";

sub xml_out {
  my $data = shift;
  my $xmlout = XMLout($data, NoAttr => 1, RootName => undef, SuppressE
+mpty => 0);
  return '<xml version="1.0" encoding="UTF-8">' . "\n$xmlout</xml>";
}

[download]

Running this produces no warning but if you uncomment the second print it does.

In reply to Re: "no warnings 'uninitialized'" failing by Mr. Muskrat
in thread "no warnings 'uninitialized'" failing by jest

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.