{	use Tk;		#needed for "Ev" defines next code line
	$retval = $main_win -> bind('<Any-KeyPress>' => 
					[\&handle_key, $s, Ev('A'), Ev('K')]);
}

##</code><code>##

       Another use of arguments allows you to write generalized methods which
       are easier to re-use:

       $a->bind("<Next>",['Next','Page']);

       $a->bind("<Down>",['Next','Line']);

       This will call $a->Next('Page') or $a->Next('Line') respectively.