Well, I’ve imported all my old OpenDiary entries. Unfortunately, there’s no easy way to export all the notes from OD, so they haven’t made their way across.<\/p>\n
Below is the perl script I used to convert ODs export format into the MovableType import format:<\/p>\n
#!\/usr\/bin\/perl<\/p>\n
{ } my $i=0; Well, I’ve imported all my old OpenDiary entries. Unfortunately, there’s no easy way to export all the notes from OD, so they haven’t made their way across. Below is the perl script I used to convert ODs export format into … Continue reading
\n open ODFILE,”< $ARGV[0]\";\n @entries=();\n while($_ =
\n {
\n if(\/^(.*?)\\s+\\- (\\d\\d?\\\/\\d\\d?\\\/\\d\\d\\d\\d)\/)
\n {
\n $entries[$#entries+1]=[$1,$2,”];<\/p>\n
\n else
\n {
\n s\/\\x0d\/\/g;
\n my $entry = $entries[$#entries];
\n ${@$entry}[2].=$_;
\n }
\n }
\n close ODFILE;
\n}<\/p>\n
\nforeach my $entry (@entries)
\n{
\n print “TITLE: “.@$entry[0].”\\n\\n”;
\n @date = split \/\\\/\/,@$entry[1];
\n print “DATE: $date[0]\/$date[1]\/$date[2] 00:00:00\\n”;
\n print “—–\\n”;
\n print “BODY:\\n”;
\n print @$entry[2];
\n print “<\/p>\n","protected":false},"excerpt":{"rendered":"