Two line poem in six lines. Not incredibly obfuscated but I like it and felt the need to share.
#!/usr/bin/perl
use strict;             use warnings;             use diagnostics;
my $self = bless({"My Mind" => " of ", "ST8" => "One"},"Mankind");
my @keys = sort(keys(%$self));my ($time, $place) = reverse(@keys);
print STDERR $self->{$time}.$time.$self->{$place}.  $place  ."\n";
print STDOUT $self->{$time}.$time.$self->{$place}.ref($self)."\n";
OneST8 of My Mind
OneST8 of Mankind