Lines Matching refs:un
124 my $un = '';
125 1 while $gz->read($un) > 0 ;
126 #print "[[$un]]\n" while $gz->read($un) > 0 ;
135 ok $un eq join('', @buffs), " expected output" ;
160 my $un = '';
164 $b = 1000 while $gz->read($un, $b) > 0 ;
165 #print "[[$un]]\n" while $gz->read($un) > 0 ;
174 ok $un eq join('', @buffs), " expected output" ;
207 my $un = '';
210 $un .= $_;
219 is $un, $buff, " expected output"
228 my $un = '';
229 #1 while $gz->read($un) > 0 ;
231 $gz->read($un) ;
232 #print "[[$un]]\n" while $gz->read($un) > 0 ;
238 ok $un eq "", " expected output" ;