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


$;                              # A lone dollar?
=$";                            # Pod?
$;                              # The return of the lone dollar?
{Just=>another=>Perl=>Hacker=>} # Bare block?
=$/;                            # More pod?
print%;                         # No right operand for %?



__END__


By Abigail; see http://perlmonks.org/?node_id=424355

Also see the more recent collection and explanation of obfu 
at shttp://perlmonks.org/?node_id=424355

selfGOL also looked interesting to explore;
the code's at http://libarynth.f0.am/cgi-bin/twiki/view/Libarynth/SelfGOL