my $ent3 = $frm_chapter -> Entry(-width=>3, 
			-insertwidth => 3,
	 		-exportselection =>1) -> 
			pack(-side => 'left',
			 -expand => 1);

# I also know that there are methods such as 
# $entry->selectionClear( );
# $entry->delete( );
# but how do I incorporate it to work when I paste?