package Some::Package::Name;
use strict;
use warnings;
my $class_data;
sub some_class_method {
my $class = shift;
some_operation_to_define($class_data);
}
sub some_other_class_method {
my $class = shift;
return some_fuction_based_on($class_data);
}
####
my $class_data;
####
our $class_data;