Hi monks, i hope you like this is my second poetry and, yes im crazy about my girl. 
#!perl

$Claudia_is = my $true_love;
$she = "is my light";
open(MY,"heart") and $brings_me_a_new_live;
$i_hope_that = "this love never";

__END__
print "I love you babe";

[download]

Replies are listed 'Best First'.
Re: I Love my girl
by Aristotle (Chancellor) on Feb 24, 2003 at 15:39 UTC
    I like the poem as such, ++. It could have been more Perlish though, in particular, the third line has much potential - something like: 
    open +(my $heart and $brings), $me . $a . new Live;

    [download]
    Although for much of the other lines you'll probably have to make a tradeoff between making it read like an actual poem or translating the meaning of the lines into compilable Perl.

    Makeshifts last the longest.

[reply]
[d/l]
Re: I Love my girl
by theorbtwo (Prior) on Feb 23, 2003 at 22:11 UTC

    I'm almost, but not quite, in the mood to -- this just because I'm bitter. ++ anyway, because it's decent perl poetry. In purticular, I like the creative use of __END__.

    Warning: Unless otherwise stated, code is untested. Do not use without understanding. Code is posted in the hopes it is useful, but without warranty. All copyrights are relinquished into the public domain unless otherwise stated. I am not an angel. I am capable of error, and err on a fairly regular basis. If I made a mistake, please let me know (such as by replying to this node).

[reply]
Re: I Love my girl
by Zad (Initiate) on Mar 11, 2003 at 01:16 UTC 
    open(MY,"$heart") || die "you bitch $!";

    [download]
    can this be the unhappy end to it? :P nice poem,btw :)
[reply]
[d/l]
Re: I Love my girl
by LAI (Hermit) on Feb 24, 2003 at 15:12 UTC

    A couple of suggestions:

    1. The word 'is' is rather pointless when you're using an =.
    2. Using my implies that the variable is being initialized... and it doesn't make much sense to assign a varible, as it's being initialized, to another.

    So, for instance, I might (assuming I were in love with Claudia as well) rewrite the first line as: 

    my $true_love = $Claudia;
# or perhaps
my $true_love = 'Claudia';
# or at least 
$Claudia = my $true_love;

    [download]

    Otherwise, I like it.

    LAI, who has done way too much "real" poetry critique
    :eof

[reply]
[d/l]
[select]

Back to Perl Poetry