view release on metacpan or  search on metacpan

bin/stardust.pl  view on Meta::CPAN

if ($config->{version}) {
  print "Stardust COMET Server $Stardust::VERSION (Perl)\n";
  exit;
}

if ($config->{demo}) {
  eval "use Stardust::Demo";
  Stardust->mount('Stardust::Demo' => '/demo');
}
Stardust->relocate($config->{base}) if $config->{base};
Stardust->init();
Stardust->continue(
  port    => $config->{port},
);

__END__

=head1 NAME

stardust.pl - Stardust COMET Server (Perl)