cleanup zombies during run, and check processes still exist

[tridge/junkcode.git] / t3.pl

#!/usr/bin/perl -w


my($base)="/usr/cvs/nas/linux";

my($s)="/usr/cvs/nas/linux/foo/bar";

if ($s =~ /$base/) {
        print "matches\n";
}