Select Code to Download

#!/usr/bin/perl -wT

...
    </TABLE>
SECOND_PART
}

CREATE TABLE diary (
  diary_key int(11) NOT NULL auto_increment,
...
  PRIMARY KEY  (diary_key),
  KEY diary_ndx (diary_key,fk_user_key)
) TYPE=MyISAM;