Searched refs:GetArtNum (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Net/demos/
H A Dnntp.mirror66 if($NumLastInDir == 0) { $GetArtNum = $NumFirst }
67 else { $GetArtNum = $NumLastInDir + 1 }
71 $ArtRef = $NntpPtr->article($GetArtNum);
74 open(OUT, ">$GetArtNum") or
75 die "Could not create $GroupName/$GetArtNum\n";
80 if($GetArtNum == $NumLast) { last }
81 $GetArtNum += 1; # Increment the article number to get

Completed in 14 milliseconds