Re: shebang pointing to script?

[Simply Hao <hao@netaxs.com>]

This is probably better:

    #!/usr/bin/perl -w
    use strict;
    
    for (@ARGV) {
        my $processor = shift;
        {
            local $0 = $0;
            local @ARGV = ($0);
            open IN, $processor or die $!;
            while (<IN>) {
                eval $_;
            }
            close IN;
        }
    }

Ok, time to trudge home.  Have a good weekend, everyone.

-Hao
**Majordomo list services provided by PANIX <URL:http://www.panix.com>**
**To Unsubscribe, send "unsubscribe phl" to majordomo@lists.pm.org**