Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

Fish dinner

by suaveant (Parson)
on Jun 04, 2001 at 22:12 UTC ( [id://85541]=poem: print w/replies, xml ) Need Help??

use Carp; unpack fish, spices; croak fish if $alive; study recipe, pop in, time; BEGIN {meal}; tied %bib; scalar fish; fork, split; sqrt lemon; glob tartarsauce; chop, open(MOUTH), chomp; unlink flesh; truncate bone, chomp; untie %bib; push plate; END {meal}; sleep now;

Update added line about cooking... (line 4)

Update2 DOH! thanks to premchai21 for pointing out tatarsauce...

                - Ant

Replies are listed 'Best First'.
Re: Fish dinner
by AidanLee (Chaplain) on Jun 04, 2001 at 22:27 UTC
    i'll never look at the square root function the same way again :)
(zdog) Re: Fish dinner
by zdog (Priest) on Jun 04, 2001 at 22:32 UTC
    Nice! But you forgot to make the fish confess () before you croaked it ... j/k.

    Zenon Zabinski | zdog |

      I thought about trying to put bless in there somewhere... but I'm not religious... :)

                      - Ant

Re: Fish dinner
by fglock (Vicar) on Jul 11, 2002 at 18:21 UTC

    my $Mmmm = $Yummy and chomp <<&EOT;

    <)))>< ~ ~ ~ ><(((> ~


      I'm having trouble with the ampersand between the "<<" and the "EOT". So is Perl 5.6.1:
      Operator or semicolon missing before &EOT at line 4.
      Ambiguous use of & resolved as operator & at line 4.
      And then there's this:
      Can't modify scalar in chomp at line 4, near "&"
      At least, it should compile. IMO.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: poem [id://85541]
Approved by root
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others lurking in the Monastery: (3)
As of 2024-05-20 13:10 GMT
Find Nodes?
    Voting Booth?

    No recent polls found