#!/usr/bin/perl

use (pragmas);

use Modules;

my $var; declare any global variables here

main code goes here

Then my subs are at the bottem. usually in order of importance