Mac Forum / Applications / Mac Applications / March 2005

now I know why the perl people spanked you.  Your post has absolutely
nothing to do with perl programming.  Nor does it have anything to do
with Macintosh.

At the very least you could have prefaced your post with "OT-".

Consider yourself wacked upside the head with a ClueByFour(tm) by this
humorless droid (at least in your case).

If "suits" is a class, then presumably you've got multiple instances of
suit objects.  Perl pseudo-code would look something like this, once per
suit that rejects:

my $suit = new Suits;
$suit->reject();

If you just figure that _all_ suits are rejecting, you could do it this
way instead:

Suits->reject();

If you wanted to make it specific to this example, it could be something
like this:

Suits->reject("Fiona Apple");

Or more precisely, maybe this:

Suits->reject({artist=>"Fiona Apple", album=>"Extraordinary Machine"});

Or more generally, rejection of albums where they don't "hear a single":

Suits->reject({hear_single => 0});

Technically you'd need something like this above any of these examples,
but you could probably delete it for t-shirt purposes:

use Suits;

or perhaps this would be more appropriate, given suits preference for
rules and bureaucracy:

require Suits;