pgupgrade.cgi 468 B

123456789101112131415161718192021222324
  1. #!/usr/local/cpanel/3rdparty/bin/perl
  2. package Troglodyne::CGI::PgUpgrade;
  3. # TODO move to lib/ and just symlink it into cgi? lol
  4. use strict;
  5. use warnings;
  6. use Cpanel::Template::Simple ();
  7. run() unless caller();
  8. sub run {
  9. print "Content-type: text/html\r\n\r\n";
  10. Cpanel::Template::process_template(
  11. 'whostmgr',
  12. {
  13. 'template_file' => 'troglodyne/pgupgrade.tmpl',
  14. 'print' => 1,
  15. }
  16. );
  17. exit;
  18. }
  19. 1;