Re: Caffeine and its delivery to monks in need

[artist]

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;
}