Perl Modes, Create Initial Document