Roger Merchberger wrote:
> >And finally, this is what I have in /var/qmail/alias/envtest.pl:
> >
> >#!/usr/local/bin/perl
> 
> [proggie snip]
> 
> >foreach $quack (@ENV) {
> > print Q "\$ENV - $quack = $ENV{$quack}\n";
> >}

@ENV, what's that? Try this:

  while(my($k,$v)=each %ENV){
    print Q "\$ENV - $k = $v\n";
  }

-- 
        Peter Haworth   [EMAIL PROTECTED]
"Is that... Is that actually fun? For you?"
                -- Asked of a passing unicyclist

Reply via email to