print qq(Why do we have to hide from the police, daddy ?\n Because they use $_->[0] and we use $_->[1], son.\n) 
	for map {$_, [reverse @$_]}[qw(emacs vi)]