package UnitedStates::agenda;

use strict;
use warnings;

our $heck_why_not;

sub new {
    my $America = shift;
    no strict;
    no warnings;
    bless ($motivations = {
            Afghanistan => 'revenge',
            Iraq        => 'oil',
            Korea       => $while_we_re_at_it,
            @_ }), $America;
}

sub war_machine { print "Goodbye world!\n" }

sub anyone_else { 1 }

sub LOCKNLOAD { war_machine() }

sub DESTROY {
    $heck_why_not++;
    anyone_else();
}

[download]

Replies are listed 'Best First'.
Re: UnitedStates::agenda
by CountZero (Bishop) on Mar 21, 2003 at 07:19 UTC

    Without going into the political discussion and purely from a poetical point of view, I find the opposition between 

    use strict;
use warnings;

    [download]
    and 
    no strict;
no warnings;

    [download]
    rather well found.

    Also the my $America = shift; in the new sub-routine was well chosen. Perhaps my $America = shift @right; would have been even better. my $America = shift $right; would be even more evocative, but that is not valid Perl.

    CountZero

    "If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law

[reply]
[d/l]
[select]

      I admire your attempt, but code will never best flame. Better to just take cover :)

[reply]
Re: UnitedStates::agenda
by mojotoad (Monsignor) on Mar 20, 2003 at 22:24 UTC
    I'd like to comment on people's reaction to this. Whether you agree with the sentiments or not, this is is posted as Poetry.

    One of the functions of art is to invoke a response. On this note I'd say this is pretty successful as Poetry.

    Don't get carried away here.

    Matt

    P.S. political speech is not the same as hate speech

[reply]
      Artists, be they painters, writers, actors or musicians, have a responsibility to reflect and interpret the world around them.
      -- DJ Shadow      , "March of Death" introductory notes

      Makeshifts last the longest.

[reply]
      One of the functions of art is to invoke a response. On this note I'd say this is pretty successful as Poetry.

      hmm, i dont think the poetry in question is particularly artistic - in both a Perl and a Poetic sense. To me it looks more like a thinly veiled, uninsightful statement.
      I agree with the sentiments of yourself and of the original post - but debate of the latter being controversial art (which was stated by someone, somewhere in this mess) is just pretentious.


      time was, I could move my arms like a bird and...
[reply]
        hmm, i dont think the poetry in question is particularly artistic - in both a Perl and a Poetic sense. To me it looks more like a thinly veiled, uninsightful statement.

        Bad art is still art. I deliberately took no position on the message.

        There's no accounting for taste, as they say. I very much doubt anyone will be hanging this poem on their wall (nor any Perl Poem, really -- who are we kidding?)

        :)

        Matt

[reply]
Re: UnitedStates::agenda
by logan (Curate) on Mar 20, 2003 at 21:36 UTC
    Damnit! OK, let me preface my remarks by saying that I'm anti- on Gulf War II and Gulf War I, don't believe that Iraq had anything to do with 9/11, and that this war is a huge mistake that America will be paying for both figuratively and literally for decades to come.

    That said, perlmonks is not the place for this. The purpose of perlmonks is to talk perl, and sometimes related issues. There are many communities for this kind of thing: Plastic and Slashdot spring to mind. But unless someone has a question about which perl modules to use to guide a missile, translate Al-Jazeera on the fly, or filter Bush's remarks to give a breakdown of the use of specific phrases or contradictions with earlier statements, perlmonks is not the place. Please, with all due respect for your opinions on the war (which I tend to agree with), take it someplace else.

    -Logan
    "What do I want? I'm an American. I want more."

[reply]

      "But unless someone has a question about which perl modules to use to guide a missile..."

      <merlyn>I have a node on that very subject!</merlyn> ;-)

       

      Just trying to bring a little humor to the discussion. My apologies to merlyn. 8^D

[reply]
Re: UnitedStates::agenda
by ibanix (Hermit) on Mar 20, 2003 at 23:08 UTC
    I down voted this node because I believe PerlMonks is not the proper place for a political discussion.

    A political discussion about perl might qualify, but this is not.

    ibanix

    $ echo '$0 & $0 &' > foo; chmod a+x foo; foo;
[reply]
[d/l]
      I believe PerlMonks is not the proper place for a political discussion.

      What use is a poetry section then?

      If you can't discuss the meaning of poetry, why bother posting it?

[reply]
Re: UnitedStates::agenda
by Anonymous Monk on Mar 21, 2003 at 14:37 UTC
    Korea => $while_we_re_at_it,

    There are 1.3 Billion reasons why the United states doesn't invade North Korea. Switch the roles around, how do you think United States citizens would react if China invaded Mexico (with unfounded claims they had NBC weapons) and installed a communist regime there? Exact same deal with North Korea. Also keep in mind North Korea has the capability to absolutely devastate South Korea's civillian population in the event of a war (think massive artillery bombardments (with or without nuclear weapons) in the heart of Seoul). The humanitarian cost would be a great deal more than with Iraq. There's also the strategic advantage with invading Iraq that the united states can set up a friendly, democratic government in the heart of the middle east, theoretically bringing some stability to the region. Whether or not that will work is definately questionable.

    Oh, and to keep on topic: print "Goodbye, World!\n"; # :)

[reply]
[d/l]
[select]
Re: UnitedStates::agenda
by Anonymous Monk on Mar 21, 2003 at 14:11 UTC
[reply]

Back to Perl Poetry