#!/usr/bin/perl -w
use strict;

use Some::Module qw< this that >;

my $Config = ...;

Main( @ARGV )
    if  $0 eq __FILE__;
return 0; # Exits -- no run-time code below this point, just 'sub's.

sub Main {
    ...
}