Select Code to Download

#!/usr/bin/perl
use warnings;
...

print "Explicit: ", Dumper [ explicit() ];
print "Bare:     ", Dumper [ bare() ];

Explicit: $VAR1 = [
          undef
        ];
Bare:     $VAR1 = [];