Lines Matching refs:seen
26 my $seen = 0;
30 $seen++ if $name eq '0';
32 print "not " unless $seen;
36 $seen = 0;
40 $seen++ if $line eq '0';
43 print "not " unless $seen;
48 $seen = 0;
49 while (($seen ? $dummy : $name) = <FILE>)
51 $seen++ if $name eq '0';
53 print "not " unless $seen;
57 $seen = 0;
59 while ($where{$seen} = <FILE>)
61 $seen++ if $where{$seen} eq '0';
63 print "not " unless $seen;
68 $seen = 0;
71 $seen++ if $name eq $wanted_filename;
73 print "not " unless $seen;
77 $seen = 0;
79 while (($seen ? $dummy : $name) = readdir(DIR))
81 $seen++ if $name eq $wanted_filename;
83 print "not " unless $seen;
87 $seen = 0;
88 while ($where{$seen} = readdir(DIR))
90 $seen++ if $where{$seen} eq $wanted_filename;
92 print "not " unless $seen;
95 $seen = 0;
98 $seen++ if $name eq $wanted_filename;
100 print "not " unless $seen;
103 $seen = 0;
105 while (($seen ? $dummy : $name) = glob('*'))
107 $seen++ if $name eq $wanted_filename;
109 print "not " unless $seen;
112 $seen = 0;
113 while ($where{$seen} = glob('*'))
115 $seen++ if $where{$seen} eq $wanted_filename;
117 print "not " unless $seen;
124 $seen = 0;
127 $seen++ if $name eq '0';
129 print "not " unless $seen;
132 $seen = 0;
134 while (($seen ? $dummy : $name) = each %hash)
136 $seen++ if $name eq '0';
138 print "not " unless $seen;
141 $seen = 0;
142 while ($where{$seen} = each %hash)
144 $seen++ if $where{$seen} eq '0';
146 print "not " unless $seen;