Select Code to Download

Select or download this

# Test that MANIFEST uses tabs - not spaces - after the name of the fi
+le.
while (<$m>) {
    chomp;
...
    isnt($file, undef, "Line $. doesn't start with a blank") or next;
    # Remember, we're running from t/
    ok(-f "../$file", "File $file exists");

Select or download this

    SKIP: {
        skip("\$0 check only on Linux and FreeBSD", 2)
        unless $^O =~ /^(linux|freebsd)$/
...
            };
            my $ps = $mydollarzero->("x");
            ok(!$ps  # we allow that something goes wrong with the ps 
+command