#!/usr/bin/perl -w
use strict;
#[globals here]
exit main();
#[subs here]
sub main {
    #code here
    return 0;
}