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

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Net/demos/
H A Dnntp.mirror44 ($GroupName, $GroupExp) = split(/\s/, $GroupLine, 2);
48 unless(-e "$BaseDir/$GroupName") {
49 unless(mkdir("$BaseDir/$GroupName", 0755))
50 { die "Could not make $BaseDir/$GroupName\n" }
52 chdir("$BaseDir/$GroupName") or die "Couldn't chdir to $GroupName\n";
59 $NntpPtr->group($GroupName);
63 { die "In $GroupName, the last number was $NumLast, but the " .
75 die "Could not create $GroupName/$GetArtNum\n";

Completed in 60 milliseconds