Lines Matching refs:demo
98 my $demo = $_[1];
101 open DEMO, "<$chap/$demo" or die "Can't open demo $chap/$demo";
102 open OUT, ">$demo" or die "Can't open $demo";
118 * $demo in /usr/demo/dtrace, a directory that contains all D scripts
122 * file:///usr/demo/dtrace/index.html
132 my $demo = $_[0];
136 if (!stat("$chap/$demo")) {
140 demo_process($chap, $demo);
144 die "Couldn't find $demo in any chapter";
177 my $demo;
197 foreach $demo (sort(@demos)) {
198 if ($demo !~ /^[a-z].*\.d$/) {
202 print HTML "<tr><td><a href=\"$demo\">$demo</a>";
205 demo_process($chap, $demo);