poem Sir mXe <code> On the first day of Creation, my $deity gave to me BEGIN { reality(); } On the second day of Creation, $deity gave to me do { print; } while ( <> ) #presuming you read ) as close parenthesis On the third day of Creation, $deity gave to me foreach my $key ( keys %hash ) { $hash->{$key} = "breathe"; } On the fourth day of Creation, $deity gave to me my $obj = Earth::Humanity->new(will => "free"); On the fifth day of Creation, $deity gave to me tie %myself, $obj->get(target => "me"); On the sixth day of Creation, $deity gave to me $myself{"name"} = "Sir mXe"; On the seventh day of Creation, $deity took a rest, $deity->sleep() && bless; ... On the final day of Revelations, $deity gave to me, END { close_reality(); } </code>