After surgery

I got out of the hospital yesterday, and I was so happy I decided to write a Perl6 poem. I tried something simple that looked like it's going to work, from Exegesis 2-6. Well, it doesn't run with perl6 that comes with parrot 0.0.13, so I guess I used unimplemented features or something, but I'll post the poem anyway, as a perl programmer's peep into the future...

my $body is closed;
my $feeling is good but uncertain;

let me := my $soul;

given $me {
    'happy' when $operation but true;
    'content' when $operation;
}
[download]

Update: fixed the 'when'. It was only here, not in my orig. code.

Comment on After surgery Download Code

Replies are listed 'Best First'.
Re: After surgery by barrd (Canon) on Nov 16, 2003 at 12:08 UTC
Hi yosefm, It could be a cut and paste issue but there's a typo (whan) in there: `'happy' whan $operation but true;` Aside from that its a nice continuation from your older post - Surgical Blues. Great to hear that it all went well and you're happy - good stuff and welcome back to the Monastery :-) Update: Fixed crappy grammar after a cup of coffee	[reply] [d/l]
Re: After surgery by duff (Parson) on Nov 17, 2003 at 05:09 UTC
Aside from the typo ("whan" rather than "when"), I think the only problem is that "let" isn't available outside of Perl 6 rules. Hmm. Perhaps "good" and "uncertain" need to be defined somewhere too as those aren't built-in to Perl 6 AFAIK. Anyway ... good show! I'm glad to see someone making perl6 poetry :-) duff	[reply]

Back to Perl Poetry