Skip to content

Instantly share code, notes, and snippets.

@zh99998
Forked from dne/smokeping.psgi
Last active September 16, 2015 07:46
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save zh99998/2326fc07179b7420aa3c to your computer and use it in GitHub Desktop.
Save zh99998/2326fc07179b7420aa3c to your computer and use it in GitHub Desktop.
Smokeping PSGI app
#!/usr/bin/perl
use strict;
use warnings;
use CGI::Emulate::PSGI;
my $app = CGI::Emulate::PSGI->handler(sub {
use CGI;
use Smokeping;
CGI::initialize_globals();
my $cfg = "/etc/smokeping/config";
my $q = CGI->new;
Smokeping::cgi($cfg, $q);
});
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment