Mods needed for migrating my blog from MovableType 4.x to WordPress 3.8

convert.pl

# mt-export-markdown.pl: Process Movable Type export files
# containing Markdown and Textile posts into pure HTML.
#
# Brian Cantoni
# 2004-04-18
#
# Modified from Mark Shroyer's original script:
# http://markshroyer.com/2010/10/mt-markdown-to-wp/
#
# Usage:
#  1. Export all posts from Movable Type into text file (ex: mt.txt)
#  2. Process text file thru this script (ex: perl conver.pl <mt.txt >wp.txt)
#  3. Import processed file (wp.txt) into WordPress

use warnings;
use strict;

use Text::Markdown qw(markdown);
use Text::Textile qw(textile);

while (<>) {
    print $_;
    if ( /^(?:EXTENDED )?BODY:$/ ) {
        my $source = '';
        while (<>) {
            last if ( /^-{5}$/ );
            $source .= $_;
        }

        if ( $source =~ /\":http/ ) {
            # If body looks like Textile
            print textile ($source) . "\n";
        }
        else {
            # Otherwise run it through the Markdown formatter
            print markdown($source);
        }
    }
}

ImportExport.pm.diff

--- ImportExport.pm.bak 2014-04-01 12:45:00.873266322 -0400
+++ ImportExport.pm     2014-04-01 17:35:53.995130625 -0400
@@ -483,15 +483,14 @@
     $tmpl->text(<<'TEXT');
 AUTHOR: <$MTEntryAuthor strip_linefeeds="1"$>
 TITLE: <$MTEntryTitle strip_linefeeds="1"$>
-BASENAME: <$MTEntryBasename$>
+BASENAME: <mt:IfNonEmpty tag="EntryKeywords"><$MTEntryKeywords$><mt:Else><$MTEntryTitle dirify="1"></mt:IfNonEmpty>
 STATUS: <$MTEntryStatus strip_linefeeds="1"$>
 ALLOW COMMENTS: <$MTEntryFlag flag="allow_comments"$>
 CONVERT BREAKS: <$MTEntryFlag flag="convert_breaks"$>
 ALLOW PINGS: <$MTEntryFlag flag="allow_pings"$><MTIfNonEmpty tag="MTEntryCategory">
 PRIMARY CATEGORY: <$MTEntryCategory$></MTIfNonEmpty><MTEntryCategories>
 CATEGORY: <$MTCategoryLabel$></MTEntryCategories>
-DATE: <$MTEntryDate format="%m/%d/%Y %I:%M:%S %p"$><MTEntryIfTagged>
-TAGS: <MTEntryTags include_private="1" glue=","><$MTTagName quote="1"$></MTEntryTags></MTEntryIfTagged>
+DATE: <$MTEntryDate format="%m/%d/%Y %I:%M:%S %p"$>
 -----
 BODY:
 <$MTEntryBody convert_breaks="0"$>
@@ -502,29 +501,6 @@
 EXCERPT:
 <$MTEntryExcerpt no_generate="1" convert_breaks="0"$>
 -----
-KEYWORDS:
-<$MTEntryKeywords$>
------
-<MTComments>
-COMMENT:
-AUTHOR: <$MTCommentAuthor strip_linefeeds="1"$>
-EMAIL: <$MTCommentEmail strip_linefeeds="1"$>
-IP: <$MTCommentIP strip_linefeeds="1"$>
-URL: <$MTCommentURL strip_linefeeds="1"$>
-DATE: <$MTCommentDate format="%m/%d/%Y %I:%M:%S %p"$>
-<$MTCommentBody convert_breaks="0"$>
------
-</MTComments>
-<MTPings>
-PING:
-TITLE: <$MTPingTitle strip_linefeeds="1"$>
-URL: <$MTPingURL strip_linefeeds="1"$>
-IP: <$MTPingIP strip_linefeeds="1"$>
-BLOG NAME: <$MTPingBlogName strip_linefeeds="1"$>
-DATE: <$MTPingDate format="%m/%d/%Y %I:%M:%S %p"$>
-<$MTPingExcerpt$>
------
-</MTPings>
 --------
 TEXT