package SQL::Translator::Parser::MySQL;
# -------------------------------------------------------------------
-# $Id: MySQL.pm,v 1.56 2007-02-19 20:15:13 duality72 Exp $
+# $Id: MySQL.pm,v 1.57 2007-02-19 23:35:27 duality72 Exp $
# -------------------------------------------------------------------
# Copyright (C) 2002-4 SQLFairy Authors
#
use strict;
use vars qw[ $DEBUG $VERSION $GRAMMAR @EXPORT_OK ];
-$VERSION = sprintf "%d.%02d", q$Revision: 1.56 $ =~ /(\d+)\.(\d+)/;
+$VERSION = sprintf "%d.%02d", q$Revision: 1.57 $ =~ /(\d+)\.(\d+)/;
$DEBUG = 0 unless defined $DEBUG;
use Data::Dumper;
$return = $comment;
}
-comment : /\/\*/ /.*?\*\//
+comment : /\/\*/ /.*?\*\//s
{
my $comment = $item[2];
$comment = substr($comment, 0, -2);
q[
DELIMITER ;;
/*!40101 SET SQL_MODE=@OLD_SQL_MODE */;;
- /*!50003 CREATE */ /*!50017 DEFINER=`cmdomain`@`localhost` */ /*!50003 TRIGGER `acl_entry_insert` BEFORE INSERT ON `acl_entry` FOR EACH ROW SET NEW.dateCreated = CONVERT_TZ(SYSDATE(),'SYSTEM','+0:00'), NEW.dateModified = CONVERT_TZ(SYSDATE(),'SYSTEM','+0:00') */;;
+ /*!50003 CREATE */ /*!50017 DEFINER=`cmdomain`@`localhost` */
+ /*!50003 TRIGGER `acl_entry_insert` BEFORE INSERT ON `acl_entry`
+ FOR EACH ROW SET NEW.dateCreated = CONVERT_TZ(SYSDATE(),'SYSTEM','+0:00'),
+ NEW.dateModified = CONVERT_TZ(SYSDATE(),'SYSTEM','+0:00') */;;
DELIMITER ;
CREATE TABLE one (