#!/usr/bin/perl --

use strict;
use warnings;
use CGI;

Main(@ARGV);
exit(0);

sub Main {
    ... # CGI program here
}