#!/usr/bin/perl
# ... rest of program
exit(0); # assuming everything went according to plan