sub thing {
	my( @args ) = @_;
	
	... code to determine what the lvalue should be.
	
	LVALUE{ $lvalue };
	
	if( $lvalue eq some condition ) {
	    ... take positive action;
	}
	else {
	    ... take negative action;
	}
}