use very_strict;

class PerlModule extends SomeModule
{
	our $Class_Data;	

	method set_something ( int $something )
	{
		this->_update_something( $something );
		this->something = $something;
	}	

	private method _update_something ( int $raw_something )
	{
		# ...
	}
}