about summary refs log tree commit diff
path: root/users/edef/depot-scan/depot-scan.pl
blob: 8808e2eb0023e4478b243dca6893f7153bec498f (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
#! /usr/bin/env -S perl -ln
use strict;

if (/^evaluating file '(.*)'$/ or
    /^copied source '(.*)' -> '.*'$/ or
    /^trace: depot-scan '(.*)'$/) {
    print $1;
    next;
}

print STDERR unless /^instantiated '.*' -> '.*'$/;