sub some_method : method : locked {
    my $self = shift;
    # ...
}