diff options
Diffstat (limited to 'lib/WebCoso/Resource.pm')
-rw-r--r-- | lib/WebCoso/Resource.pm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/lib/WebCoso/Resource.pm b/lib/WebCoso/Resource.pm new file mode 100644 index 0000000..39179fe --- /dev/null +++ b/lib/WebCoso/Resource.pm @@ -0,0 +1,20 @@ +package WebCoso::Resource; +use strict; +use warnings; +use Class::Std; +#use WebCoso::X; + +{ +my %values_of :ATTR(:default<{}>); +my %axes_of :ATTR(:default<{}>); + +sub get_axes { + my ($self)=@_; + + return keys %{$axes_of{ident $self}}; +} + + +} + +1; |