#!/usr/bin/perl

use strict;
use warnings;

my %hash;
print %hash ? 'defined' : 'undefined';