Re: Caffeine and its delivery to monks in need

[artist]

in reply to Caffeine and its delivery to monks in need

Hi,
Would some one please tell me, why associate Caffeine with perl.

After all, there is more than one way to achieve.

Point of view
of
an artist.

[Sinister]

You are absolutely right! We musn't forget nicotine (in some cases that is) and pizza in this lovely thread!



foreach $self ( keys %monks ) { 
  $monks{$self}->{$_}++ foreach(qw(caffeine nicotine pizza)) 
}



er formait hyarya.
"Field experience is something you don't get until just after you need it."

[smitz]

Surely you jest and mean:

&smoke while (1);

cancer SMiTZ

[AidanLee]

Supply your own list of vices:

@foibles = qw( caffiene pizza ... );

foreach $monk (@perlmonks) {
    push @{ $monk->{toConsume} }, 
        grep { exists $monk->{vices}{$_} } @foibles;
}