my @arr = get_it(); my %hash = get_it(); sub get_it { if (defined wantarray) { print wantarray ? 'list' : 'scalar'; } else { print 'void'; } print " context\n"; return; }