Filtering mail through a perl script

From: Par Von Zweigbergk <ekapvon_at_eka.ericsson.se>
Date: Mon, 7 Jul 1997 17:03:06 +0200

Hi everybody,

I have a small problem .. in my aliases-file i have added

arsout:"|/tools/gnu/bin/perl /tmp/arsfilter.pl"

And now i want the perl-script arsfilter.pl to receive the mail sent to arsout
as STDIN .
In the perl-script arsfilter.pl i've written :
 
while(<STDIN>)
{
    $theinmail[$i] = $_;
    $i++;
}

but the script never seems to execute when i sen a mail with the command :

> mail arsout_at_somewhere.com < testmail

Have i done the right thing ?? and in that case what must i do to get my program
running.
The script works when i write :

> arsfilter < testmail

Regards ,

        Pär von Zweigbergk
        Ericsson Components AB
Received on Mon Jul 07 1997 - 17:21:06 NZST