view release on metacpan or  search on metacpan

lib/App/AltSQL/Term/Plugin/SyntaxHighlight.pm  view on Meta::CPAN

use Moose::Role;
use Term::ANSIColor qw(color colored);

# Very very basic keyword highlighting
my @input_highlighting = (
	{
		color => 'yellow',
		words => [qw(
			action add after aggregate all alter as asc auto_increment avg avg_row_length
			both by
			cascade change character check checksum column columns comment constraint create cross
			current_date current_time current_timestamp
			data database databases day day_hour day_minute day_second
			default delayed delay_key_write delete desc describe distinct distinctrow drop
			enclosed escape escaped explain
			fields file first flush for foreign from full function
			global grant grants group
			having heap high_priority hosts hour hour_minute hour_second
			identified ignore index infile inner insert insert_id into isam
			join
			key keys kill last_insert_id leading left limit lines load local lock logs long