package Some::Module;

use strict;

sub new {
	return bless {};
}

sub do_something {
	my ($self, $param) = @_;
	# ...do something...
	return $param;
}

sub do_more {
	my $self = shift;
	return do_something('example');
}