lib/MooseX/Singleton.pm

   1 package MooseX::Singleton;
   2 use Moose;
   3 use MooseX::Singleton::Object;
   4 use MooseX::Singleton::Meta::Class;
   5
   6 our $VERSION = 0.02;
   7
   8 sub import {
   9     my $caller = caller;
  10
  11     Moose::init_meta($caller, 'MooseX::Singleton::Object', 'MooseX::Singleton::Meta::Class');
  12
  13     Moose->import({into => $caller});
  14     strict->import;
  15     warnings->import;
  16
  17 }
  18
  19 1;
  20