Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re: mmmmmmm

by frankus (Priest)
on Jul 25, 2002 at 16:46 UTC ( #185248=note: print w/replies, xml ) Need Help??


in reply to mmmmmmm

I guess it takes all sorts to make a world,
Don't you need some exception handling for $munchies and
a module to recover gracefully from short-term memory leaks?

Oh well, if it does make you one with the Llama, I guess we can expect to see:

Purchase::All_Night_Garage::Rizla Purchase::All_Night_Garage::Marlboro_Lights
Appearing at a CPAN Mirror soon. ;-P

--

Brother Frankus.

¤

Replies are listed 'Best First'.
Re: Re: mmmmmmm
by barrd (Monsignor) on Jul 29, 2002 at 15:06 UTC
    Purchase::All_Night_Garage::Marlboro_Lights

    Surely that should be:

    Purchase::All_Night_Garage::Camel_Lights
    
    IMHO     ;-)

    barrd

Re: Re: mmmmmmm
by marvell (Pilgrim) on Jul 30, 2002 at 22:22 UTC
    I understand it's normally:
    Purchase::All_Night_Garage::Rizla::Kingsize

    and also ...

    Purchase::All_Night_Garage::Pringles Purchase::All_Night_Garage::Drink(rand) Purchase::All_Night_Garage::Flapjack(!caramel)
    I believe there is still problems with the code for the module which sets the consumption threshold. Keeps throwing whitey errors.

    --
    ¤ Steve Marvell

      Well if this is going to turn into a wish list...
      sub Purchase::All_Night_Garage::Lighter::Clipper { my $self = shift; # Dude, purchase is like, er theft, but you pay for it. use Tax::Lighter::Clipper; my $clipper = Tax::Lighter::Clipper->new(); # Makes sense to have another module for trying to get # loose change out of front pocket of tight jeans. my $cost = Stoner::fumbling::pocket->new(); $self->draw($cost); push @{$self->{assets}}=@_ unless $self->random_forgetfulness; return 'home'; } # Mutator method: sub Purchase::All_Night_Garage::Rizla::Kingsize($){ my $range = { blue=>'master', red=>'novice' }; return 0 unless exists($range->{$_[1]}); $_[0]->{rizla}->{colour} = $_[1]; }

      --

      Brother Frankus.

      ¤

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://185248]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (6)
As of 2016-10-01 18:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?






    Results (3 votes). Check out past polls.