Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Can of soda

by Trag (Monk)
on Jun 28, 2004 at 15:06 UTC ( [id://370213] : note . print w/replies, xml ) Need Help??


in reply to Can of soda

drink $soda->pop;
get(job);


our @item = reverse (114, 101, 107, 99, 97, 104, 32, 108, 114, 101, 80, 32, 114, 101, 104, 116, 111, 110, 97, 32, 116, 115, 117, + 74); local $my = reverse ")meti@\ ,rhc (pam tnirp";eval $my;

Replies are listed 'Best First'.
Re^2: Can of soda
by bageler (Hermit) on Jun 29, 2004 at 21:59 UTC
    wouldn't that more appropriately be
    $sodapop->drink;
      Yeah, but better yet (IMHO) would be
      pop @soda;


      our @item = reverse (114, 101, 107, 99, 97, 104, 32, 108, 114, 101, 80, 32, 114, 101, 104, 116, 111, 110, 97, 32, 116, 115, 117, + 74); local $my = reverse ")meti@\ ,rhc (pam tnirp";eval $my;