#!/usr/bin/perl

use strict;
use warnings;

=head1 A few good subs

=para  This is a line of Pod. This module contains
       some functions and  might be used as follows:

=code       do_something(); # Magic happens here!


# ------------------
# Subroutines
# ------------------

=head2 do_something

=para  You'd use this I<awesome> function for:
=item      When you want to do foo.
=item      When you want to do bar, since foo obviously
           isn't cutting it.

sub do_something {
    print "Magic goes here.\n";
}

print "hi.\n";
do_something;
print "bye!\n";