Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
sub hoge {
return;
}
sub fuga {
return 1;
}
sub piyo {
return {
a => hoge(),
b => fuga(),
};
}
print Dumper piyo();
@mix3

This comment has been minimized.

Copy link
Owner Author

mix3 commented Dec 2, 2014

Odd number of elements in anonymous hash at /Users/mix3/tmp/sample.pl line 17.
$VAR1 = {
          'a' => 'b',
          '1' => undef
        };
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.