Language Basics Perl

#!/usr/bin/perl -w
use strict;
setup;
sub setup {
    print "This is some program, version 0.1\n";
}